
Time bar (total: 27.5s)
| 1× | search |
| Probability | Valid | Unknown | Precondition | Infinite | Domain | Can't | Iter |
|---|---|---|---|---|---|---|---|
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 0 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 1 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 2 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 3 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 4 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 5 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 6 |
| 18.8% | 18.7% | 81.1% | 0.2% | 0% | 0% | 0% | 7 |
| 18.8% | 18.7% | 81.1% | 0.2% | 0% | 0% | 0% | 8 |
| 18.8% | 18.7% | 81.1% | 0.2% | 0% | 0% | 0% | 9 |
| 34.4% | 34.3% | 65.5% | 0.2% | 0% | 0% | 0% | 10 |
| 54.7% | 54.6% | 45.2% | 0.2% | 0% | 0% | 0% | 11 |
| 54.7% | 54.6% | 45.2% | 0.2% | 0% | 0% | 0% | 12 |
Compiled 39 to 18 computations (53.8% saved)
| 1.5s | 2 925× | 1 | valid |
| 831.0ms | 5 270× | 0 | valid |
| 57.0ms | 61× | 2 | valid |
ival-mult: 500.0ms (25.3% of total)ival-hypot: 287.0ms (14.5% of total)ival-sin: 275.0ms (13.9% of total)ival-log: 268.0ms (13.5% of total)adjust: 242.0ms (12.2% of total)ival-atan2: 149.0ms (7.5% of total)ival-exp: 98.0ms (5% of total)ival-sub: 78.0ms (3.9% of total)ival-add: 78.0ms (3.9% of total)ival-assert: 3.0ms (0.2% of total)| Ground Truth | Overpredictions | Example | Underpredictions | Example | Subexpression |
|---|---|---|---|---|---|
| 182 | 0 | - | 0 | - | (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) |
| 128 | 0 | - | 1 | (1.163081559258246e-160 1.2257656455381883e-185 -3.681523701631174e+125 4.7093992982443015e+114) | (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
| 3 | 0 | - | 1 | (6.257053194292254e+277 4.450931503123255e-37 -0.1392054084815369 1.4281112684154543e+85) | (*.f64 (atan2.f64 x.im x.re) y.im) |
| 1 | 0 | - | 0 | - | (*.f64 (atan2.f64 x.im x.re) y.re) |
| 1 | 0 | - | 1 | (6.257053194292254e+277 4.450931503123255e-37 -0.1392054084815369 1.4281112684154543e+85) | (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
| 0 | 0 | - | 0 | - | (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) |
| 0 | 0 | - | 0 | - | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| 0 | 0 | - | 0 | - | (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
| 0 | 0 | - | 0 | - | (atan2.f64 x.im x.re) |
| 0 | 0 | - | 0 | - | (*.f64 x.re x.re) |
| 0 | 0 | - | 0 | - | (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
| 0 | 0 | - | 0 | - | x.re |
| 0 | 0 | - | 0 | - | x.im |
| 0 | 0 | - | 0 | - | (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) |
| 0 | 0 | - | 0 | - | (*.f64 x.im x.im) |
| 0 | 0 | - | 0 | - | (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) |
| 0 | 0 | - | 0 | - | y.re |
| 0 | 0 | - | 0 | - | y.im |
| 0 | 0 | - | 0 | - | (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
| Operator | Subexpression | Explanation | Count | |
|---|---|---|---|---|
sin.f64 | (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) | sensitivity | 182 | 0 |
sqrt.f64 | (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) | oflow-rescue | 112 | 0 |
| ↳ | (*.f64 x.re x.re) | overflow | 68 | |
| ↳ | (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) | overflow | 112 | |
| ↳ | (*.f64 x.im x.im) | overflow | 59 | |
*.f64 | (*.f64 (atan2.f64 x.im x.re) y.im) | n*u | 1 | 0 |
sqrt.f64 | (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) | uflow-rescue | 1 | 0 |
| ↳ | (*.f64 x.re x.re) | underflow | 49 | |
| ↳ | (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) | underflow | 15 | |
| ↳ | (*.f64 x.im x.im) | underflow | 64 |
| Predicted + | Predicted - | |
|---|---|---|
| + | 153 | 0 |
| - | 59 | 44 |
| Predicted + | Predicted Maybe | Predicted - | |
|---|---|---|---|
| + | 153 | 0 | 0 |
| - | 59 | 0 | 44 |
| number | freq |
|---|---|
| 0 | 44 |
| 1 | 129 |
| 2 | 82 |
| 3 | 1 |
| Predicted + | Predicted Maybe | Predicted - | |
|---|---|---|---|
| + | 1 | 0 | 0 |
| - | 0 | 0 | 0 |
| 213.0ms | 354× | 1 | valid |
| 26.0ms | 152× | 0 | valid |
| 5.0ms | 6× | 2 | valid |
Compiled 393 to 61 computations (84.5% saved)
ival-mult: 35.0ms (21.7% of total)adjust: 28.0ms (17.4% of total)ival-sin: 22.0ms (13.6% of total)ival-add: 19.0ms (11.8% of total)ival-hypot: 18.0ms (11.2% of total)ival-log: 18.0ms (11.2% of total)ival-atan2: 11.0ms (6.8% of total)ival-exp: 5.0ms (3.1% of total)ival-sub: 4.0ms (2.5% of total)ival-true: 1.0ms (0.6% of total)ival-assert: 0.0ms (0% of total)Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 141 | 575 |
| 1 | 390 | 556 |
| 2 | 1085 | 552 |
| 3 | 2819 | 550 |
| 0 | 19 | 37 |
| 0 | 34 | 37 |
| 1 | 62 | 36 |
| 2 | 157 | 36 |
| 3 | 342 | 36 |
| 4 | 822 | 36 |
| 5 | 4539 | 36 |
| 0 | 8183 | 25 |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Outputs |
|---|
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (exp.f64 y.im)) (atan2.f64 x.im x.re)) (sin.f64 (+.f64 (+.f64 (fma.f64 (neg.f64 y.im) (log.f64 (hypot.f64 x.im x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 (hypot.f64 x.im x.re) y.re)) |
Compiled 37 to 19 computations (48.6% saved)
Compiled 0 to 4 computations (-∞% saved)
| Status | Accuracy | Program |
|---|---|---|
| ▶ | 40.8% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
Compiled 37 to 19 computations (48.6% saved)
| Inputs |
|---|
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(*.f64 x.re x.re) |
x.re |
(*.f64 x.im x.im) |
x.im |
y.re |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(atan2.f64 x.im x.re) |
y.im |
(sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) |
(*.f64 (atan2.f64 x.im x.re) y.re) |
| Outputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2)))) |
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2))) |
#s(approx x.re #s(hole binary64 x.re)) |
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re)))) |
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))) |
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2))) |
#s(approx x.im #s(hole binary64 x.im)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx y.re #s(hole binary64 y.re)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx y.im #s(hole binary64 y.im)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
12 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 73.0ms | y.re | @ | 0 | ((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) |
| 12.0ms | x.re | @ | -inf | ((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) |
| 12.0ms | y.im | @ | 0 | ((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) |
| 12.0ms | x.im | @ | inf | ((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) |
| 11.0ms | x.re | @ | inf | ((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 1580 | 20000 |
| 0 | 1611 | 19794 |
| 0 | 8240 | 16874 |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| Inputs |
|---|
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(*.f64 x.re x.re) |
x.re |
(*.f64 x.im x.im) |
x.im |
y.re |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(atan2.f64 x.im x.re) |
y.im |
(sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) |
(*.f64 (atan2.f64 x.im x.re) y.re) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2)))) |
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2))) |
#s(approx x.re #s(hole binary64 x.re)) |
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re)))) |
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))) |
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2))) |
#s(approx x.im #s(hole binary64 x.im)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx y.re #s(hole binary64 y.re)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx y.im #s(hole binary64 y.im)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
| Outputs |
|---|
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) |
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) |
(+.f64 (cosh.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sinh.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (atan2.f64 x.im x.re) y.im))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (fma.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))))) |
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)) |
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(+.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)) |
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) |
(log.f64 (hypot.f64 x.re x.im)) |
(pow.f64 (fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)) #s(literal 1/2 binary64)) |
(sqrt.f64 (fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im))) |
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64))) |
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (neg.f64 x.im)) |
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (fabs.f64 x.im)) |
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) x.im) |
(hypot.f64 (neg.f64 x.re) (pow.f64 x.im #s(literal 1 binary64))) |
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im)) |
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im)) |
(hypot.f64 (neg.f64 x.re) x.im) |
(hypot.f64 (fabs.f64 x.re) (pow.f64 x.im #s(literal 1 binary64))) |
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im)) |
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im)) |
(hypot.f64 (fabs.f64 x.re) x.im) |
(hypot.f64 x.re (pow.f64 x.im #s(literal 1 binary64))) |
(hypot.f64 x.re (neg.f64 x.im)) |
(hypot.f64 x.re (fabs.f64 x.im)) |
(hypot.f64 x.re x.im) |
(/.f64 (-.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
(fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)) |
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)) |
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im)) |
(fma.f64 x.re x.re (*.f64 x.im x.im)) |
(-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64))) |
(*.f64 (neg.f64 x.re) (neg.f64 x.re)) |
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re)) |
(*.f64 x.re x.re) |
(pow.f64 x.re #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64))) |
x.re |
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64))) |
(*.f64 (neg.f64 x.im) (neg.f64 x.im)) |
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im)) |
(*.f64 x.im x.im) |
(pow.f64 x.im #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64))) |
x.im |
y.re |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(atan2.f64 x.im x.re) |
y.im |
(fma.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) |
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re)) |
(+.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) |
(*.f64 (atan2.f64 x.im x.re) y.re) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im)) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64))) (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im)) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 x.im x.im (*.f64 x.re x.re))) |
#s(approx (* x.re x.re) (*.f64 x.re x.re)) |
#s(approx x.re x.re) |
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re))) |
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.im))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.im (log.f64 x.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))) |
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re)) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 #s(literal 1 binary64) (*.f64 x.re x.re) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 x.re x.re)))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 x.re x.re)) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re)) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.re) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64))) (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64))))))) |
#s(approx (* x.im x.im) (*.f64 x.im x.im)) |
#s(approx x.im x.im) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.re))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.im (log.f64 x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 #s(literal 1 binary64) (*.f64 x.im x.im) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (*.f64 x.im x.im)))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 y.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) |
#s(approx y.re y.re) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) y.re (*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)) y.re))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) y.re) y.re (*.f64 (atan2.f64 x.im x.re) y.re))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (fma.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) #s(literal -1 binary64))) y.re (*.f64 (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re) y.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) |
#s(approx y.im y.im) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) y.im) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) y.im (*.f64 (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im) y.im))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) y.im) (*.f64 #s(literal 1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (fma.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) #s(literal -1 binary64))) y.im (*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) y.im)))) |
Compiled 33 322 to 2 842 computations (91.5% saved)
13 alts after pruning (13 fresh and 0 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 442 | 13 | 455 |
| Fresh | 0 | 0 | 0 |
| Picked | 1 | 0 | 1 |
| Done | 0 | 0 | 0 |
| Total | 443 | 13 | 456 |
| Status | Accuracy | Program |
|---|---|---|
| ▶ | 75.0% | (*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| 60.9% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) | |
| 32.5% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))) | |
| ▶ | 20.6% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))))) |
| 24.9% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 54.5% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) | |
| ▶ | 39.2% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
| 47.2% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) | |
| 12.3% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))) | |
| ▶ | 7.4% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
| 28.5% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) | |
| 30.8% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) | |
| ▶ | 30.0% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
Compiled 2 444 to 946 computations (61.3% saved)
| Inputs |
|---|
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) |
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) |
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) |
(log.f64 (hypot.f64 x.re x.im)) |
(hypot.f64 x.re x.im) |
x.re |
x.im |
y.re |
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(atan2.f64 x.im x.re) |
y.im |
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) |
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (atan2.f64 x.im x.re) y.re) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
(*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(exp.f64 (*.f64 y.re (log.f64 x.im))) |
(*.f64 y.re (log.f64 x.im)) |
(log.f64 x.im) |
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) |
(*.f64 y.im (atan2.f64 x.im x.re)) |
(sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) |
(fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))) |
(*.f64 y.re (atan2.f64 x.im x.re)) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
(fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) |
#s(literal -1/2 binary64) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(literal 1 binary64) |
(*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) |
(log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) |
(pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im) |
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(fma.f64 x.im x.im (*.f64 x.re x.re)) |
(*.f64 x.re x.re) |
#s(literal 1/2 binary64) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) |
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))))))) |
#s(literal -1/6 binary64) |
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
(sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(/.f64 (PI.f64) #s(literal 2 binary64)) |
(PI.f64) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) |
#s(literal 3 binary64) |
(fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))) |
#s(literal 1/6 binary64) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))))) |
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)) |
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)) |
(fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(*.f64 x.im x.im) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
(-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) |
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) |
(*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) |
(neg.f64 y.im) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) |
(*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
(*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))))) |
(sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) |
(pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) |
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) |
(pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) |
(+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) |
(-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) |
| Outputs |
|---|
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.im y.re))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re)))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re)))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im))))))) |
#s(approx x.re #s(hole binary64 x.re)) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re))))) |
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re)))) |
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))) |
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (exp (* y.im (atan2 x.im x.re))))) |
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re)))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) |
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (/ (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (/ (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.re 2) (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (log (pow x.im y.im))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (log (pow x.im y.im))))) (pow x.im 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (+ (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (log (pow x.im y.im)))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/24 (* (pow x.re 2) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* 1/2 (/ y.im (pow x.im 2)))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* 1/720 (* (pow x.re 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow x.im y.im))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (pow x.im y.im))) (pow x.im 2))) (pow x.im y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im))))) (pow x.im y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))) (pow x.im y.im))))))) (pow x.im y.im)))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.im)) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2)))) |
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2))) |
#s(approx (pow (atan2 x.im x.re) 2) #s(hole binary64 (pow (atan2 x.im x.re) 2))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (pow x.im 2))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (log (pow x.im y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (pow x.im 4))) (+ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (pow x.im 2))))) (* (pow (log x.im) 2) (sin (log (pow x.im y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (pow x.im 4))) (+ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (+ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (pow x.im 2)))))) (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (pow x.im 2))))) (* (pow (log x.im) 2) (sin (log (pow x.im y.im))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.im) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)) (pow (log x.im) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (+ (* 1/4 (/ 1 (pow x.im 4))) (* (pow x.re 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.im))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.im))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (/ (pow (atan2 x.im x.re) 3) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (pow (atan2 x.im x.re) 3) #s(hole binary64 (pow (atan2 x.im x.re) 3))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))) (* (pow (log x.im) 3) (sin (log (pow x.im y.im))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))))))))) (* (pow (log x.im) 3) (sin (log (pow x.im y.im))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (+ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))) (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))))))) (* (pow (log x.im) 3) (sin (log (pow x.im y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.im) 3))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (pow (log x.im) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow (log x.im) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (+ (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))))))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow (log x.im) 3)))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (/ (* (pow x.re 2) (* (log x.im) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (/ (* (log x.im) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow x.re 2) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (/ (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log x.im) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow (log x.im) 2) (atan2 x.im x.re)) (/ (* (pow x.re 2) (* (log x.im) (atan2 x.im x.re))) (pow x.im 2))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (/ (* (log x.im) (atan2 x.im x.re)) (pow x.im 2)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))))) (/ (* (log x.im) (atan2 x.im x.re)) (pow x.im 2)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (/ (* (log x.im) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (atan2 x.im x.re) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (atan2 x.im x.re) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (atan2 x.im x.re) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/6 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.im) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* (log x.im) (atan2 x.im x.re)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2))) (* (log x.im) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log x.im) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 4))) (* 1/2 (/ (atan2 x.im x.re) (pow x.im 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log x.im) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (atan2 x.im x.re) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (atan2 x.im x.re) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 6)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (/ (atan2 x.im x.re) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (log x.im) (sin (log (pow x.im y.im)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (pow x.im 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 4))) (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 4))) (+ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 6))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow x.im 2))) (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (log (pow x.im y.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/24 (/ (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2)))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6)))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6)))))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (pow x.re 2) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (pow x.re 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.re 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 6)))))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (pow x.im 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))) (pow x.im 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))))))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (pow x.re 2) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (* (pow x.re 2) (+ (* -1 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.re 2) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.im) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.im) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.im) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* (pow x.re 2) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))) (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 3) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))) (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))) (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (* (pow y.im 3) (pow (log x.im) 3)))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* (pow x.re 2) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow y.im 3) (pow (log x.im) 3))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))) (* (pow y.im 3) (pow (log x.im) 3))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 3) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))) (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))) (* (pow y.im 3) (pow (log x.im) 3))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))) |
#s(approx (pow (* (atan2 x.im x.re) y.re) 3) #s(hole binary64 (* (pow y.re 3) (pow (atan2 x.im x.re) 3)))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2))) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 6))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2))) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log x.im) 2)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow y.im 2) (pow (log x.im) 2)) (/ (* (pow x.re 2) (* (pow y.im 2) (log x.im))) (pow x.im 2))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (* 1/4 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/6 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 6))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 6)))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4)) (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 6))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.re))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.re))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.re)) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)) (+ (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4)) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ 1 x.re)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (pow (log (/ 1 x.re)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 6))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (pow (log (/ 1 x.re)) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)) (pow x.re 4))) (+ (* 1/720 (/ (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 6) (log (/ 1 x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)) (pow x.re 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)) (pow x.re 6)) (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)) (pow x.re 4))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow x.re 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 6)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))))) (pow x.re 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (* (pow x.re 6) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (+ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))) (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (+ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))) (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (pow x.re 6))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4)) (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 6))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.re))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.re))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.re))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)) (+ (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4)) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ -1 x.re)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (pow (log (/ -1 x.re)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.re))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 6))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (pow (log (/ -1 x.re)) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)) (pow x.re 4))) (+ (* 1/720 (/ (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 6) (log (/ -1 x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)) (pow x.re 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)) (pow x.re 6)) (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)) (pow x.re 4))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (pow x.re 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 6)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))))) (pow x.re 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (* (pow x.re 6) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (+ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))) (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (+ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))) (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (pow x.re 6))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.re y.re))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re)))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re)))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re))))))) |
#s(approx x.im #s(hole binary64 x.im)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))))))) |
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (pow x.im y.re))) |
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im)))) |
#s(approx (log x.im) #s(hole binary64 (log x.im))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (/ (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (/ (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.im 2) (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (log (pow x.re y.im))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (log (pow x.re y.im))))) (pow x.re 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (+ (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (log (pow x.re y.im)))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/24 (* (pow x.im 2) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* 1/2 (/ y.im (pow x.re 2)))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* 1/720 (* (pow x.im 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow x.re y.im))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (pow x.re y.im))) (pow x.re 2))) (pow x.re y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im))))) (pow x.re y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))) (pow x.re y.im))))))) (pow x.re y.im)))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (pow x.re 2))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (log (pow x.re y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (pow x.re 4))) (+ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (pow x.re 2))))) (* (pow (log x.re) 2) (sin (log (pow x.re y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (pow x.re 4))) (+ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (+ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (pow x.re 2)))))) (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (pow x.re 2))))) (* (pow (log x.re) 2) (sin (log (pow x.re y.im))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.re) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (/ (* (pow x.im 2) (log x.re)) (pow x.re 2)) (pow (log x.re) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (+ (* 1/4 (/ 1 (pow x.re 4))) (* (pow x.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.re))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.re))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))) (* (pow (log x.re) 3) (sin (log (pow x.re y.im))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))))))))) (* (pow (log x.re) 3) (sin (log (pow x.re y.im))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (+ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))) (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))))))) (* (pow (log x.re) 3) (sin (log (pow x.re y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.re) 3))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (pow (log x.re) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow (log x.re) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (+ (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))))))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow (log x.re) 3)))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log x.re) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (/ (* (pow x.im 2) (* (log x.re) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log x.re) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (/ (* (log x.re) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow x.im 2) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log x.re) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (/ (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.re) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log x.re) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow (log x.re) 2) (atan2 x.im x.re)) (/ (* (pow x.im 2) (* (log x.re) (atan2 x.im x.re))) (pow x.re 2))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (/ (* (log x.re) (atan2 x.im x.re)) (pow x.re 2)))) (* (pow (log x.re) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))))) (/ (* (log x.re) (atan2 x.im x.re)) (pow x.re 2)))) (* (pow (log x.re) 2) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (/ (* (log x.re) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (atan2 x.im x.re) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (atan2 x.im x.re) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (atan2 x.im x.re) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/6 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.re) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* (log x.re) (atan2 x.im x.re)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2))) (* (log x.re) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log x.re) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 4))) (* 1/2 (/ (atan2 x.im x.re) (pow x.re 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log x.re) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (atan2 x.im x.re) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (atan2 x.im x.re) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 6)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (log x.re) (sin (log (pow x.re y.im)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (pow x.re 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 4))) (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 4))) (+ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 6))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow x.re 2))) (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (log (pow x.re y.im))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/24 (/ (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6)))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6)))))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (pow x.im 2) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (pow x.im 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.im 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 6)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (pow x.re 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))) (pow x.re 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))))))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (pow x.im 2) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (* (pow x.im 2) (+ (* -1 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.im 2) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* (pow x.im 2) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))) (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 3) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))) (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))) (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (* (pow y.im 3) (pow (log x.re) 3)))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* (pow x.im 2) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow y.im 3) (pow (log x.re) 3))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))) (* (pow y.im 3) (pow (log x.re) 3))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 3) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))) (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))) (* (pow y.im 3) (pow (log x.re) 3))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2))) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 6))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2))) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log x.re) 2)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow y.im 2) (pow (log x.re) 2)) (/ (* (pow x.im 2) (* (pow y.im 2) (log x.re))) (pow x.re 2))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (* 1/4 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/6 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 6))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 6)))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6))))))))))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im))))))) |
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im)))))) |
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4)) (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 6))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.im))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.im))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)) (+ (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4)) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ 1 x.im)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (pow (log (/ 1 x.im)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 6))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (pow (log (/ 1 x.im)) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)) (pow x.im 4))) (+ (* 1/720 (/ (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 6) (log (/ 1 x.im))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)) (pow x.im 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)) (pow x.im 6)) (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)) (pow x.im 4))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (pow x.im 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 6)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))))) (pow x.im 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (* (pow x.im 6) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (+ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))) (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (+ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))) (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (pow x.im 6))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6))))))))))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))) |
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))) |
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im)))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4)) (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 6))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.im))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.im))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.im))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)) (+ (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4)) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ -1 x.im)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (pow (log (/ -1 x.im)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 6))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (pow (log (/ -1 x.im)) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)) (pow x.im 4))) (+ (* 1/720 (/ (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 6) (log (/ -1 x.im))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)) (pow x.im 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)) (pow x.im 6)) (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)) (pow x.im 4))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (pow x.im 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 6)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))))) (pow x.im 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (* (pow x.im 6) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (+ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))) (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (+ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))) (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (pow x.im 6))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 1)) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx y.re #s(hole binary64 y.re)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log x.im))) (* (log x.im) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log x.im))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (* y.im (log x.im))) (* (log x.im) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 1)) |
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (log x.im))))) |
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* 1/2 (* y.re (pow (log x.im) 2)))))))) |
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2))))))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.im))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im)))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (* y.re (- (atan2 x.im x.re) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (* y.re (- (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (atan2 x.im x.re)) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (* y.re (- (+ (* y.re (- (* y.re (- (* -1/6 (pow (atan2 x.im x.re) 3)) (* -1 (* y.im (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))))))) (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (atan2 x.im x.re)) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* y.re (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* 1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* y.re (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1 (* y.im (* y.re (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))) (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* y.re (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (+ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* -1/6 (pow (atan2 x.im x.re) 3)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* -1/6 (pow (atan2 x.im x.re) 3)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (- (* -1 (* y.re (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (- (* y.re (- (* -1 (/ (* y.re (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (* (pow y.im 3) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* (pow y.im 3) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (- (* y.re (pow (atan2 x.im x.re) 2)) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.re (- (* y.re (pow (atan2 x.im x.re) 2)) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* (pow y.re 3) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* (pow y.im 3) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.re (- (+ (* -1 (/ (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))) (pow y.re 2))) (atan2 x.im x.re)) (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.re (- (+ (* -1 (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))))) (* (pow y.re 3) (atan2 x.im x.re)))) (atan2 x.im x.re)) (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (atan2 x.im x.re)))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (atan2 x.im x.re))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (* (pow y.re 3) (pow (atan2 x.im x.re) 3)))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (* (pow y.re 3) (+ (/ (* (pow y.im 3) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow y.re 3)) (pow (atan2 x.im x.re) 3))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.re)) (pow (atan2 x.im x.re) 2))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (pow y.re 2) (- (+ (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)) (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.re))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.re)) (pow (atan2 x.im x.re) 2))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (* -1 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* y.re (exp (* y.im (atan2 x.im x.re))))))) y.re)) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* -1 (/ (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) y.re))) y.re)) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) y.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (* -1/2 (/ (PI) y.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (- (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* y.re (atan2 x.im x.re)))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re)))) (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re)))) y.re)) (* -1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (* (pow y.im 3) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow y.re 3))) (* -1 (pow (atan2 x.im x.re) 3))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (- (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) y.re)) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) y.re)) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 1)) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re))))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) |
#s(approx y.im #s(hole binary64 y.im)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (- (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* 1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re)))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re)))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re)))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 1)) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (+ (* y.im (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.re (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (+ (* y.re (- (+ (* -1/2 (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.im (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (+ (* y.im (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (+ (* y.re (- (+ (* -1/2 (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1/2 (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* y.im (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* y.im (- (+ (* y.im (- (* (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))) (+ (* 1/2 (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (pow (atan2 x.im x.re) 2))) (* (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 1)) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (- (* -1 (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re)))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))) (+ (* -1/2 (pow (atan2 x.im x.re) 3)) (* 1/6 (pow (atan2 x.im x.re) 3)))))) (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* y.im (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* y.im (* (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (atan2 x.im x.re) 2))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.im (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* 1/24 (* y.im (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 1)) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (+ (* y.im (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (* (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* y.im (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* y.im (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* y.im (- (+ (* y.im (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))) (+ (* 1/2 (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (pow (atan2 x.im x.re) 2))) (* (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.im (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* y.im (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (pow (atan2 x.im x.re) 3))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1 (* y.im (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (pow (atan2 x.im x.re) 5)) (* 1/2 (pow (atan2 x.im x.re) 5))))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (pow (atan2 x.im x.re) 5)) (* 1/2 (pow (atan2 x.im x.re) 5))) (atan2 x.im x.re))) (+ (* -1/2 (pow (atan2 x.im x.re) 6)) (* 1/6 (pow (atan2 x.im x.re) 6)))))) (+ (* -1 (pow (atan2 x.im x.re) 5)) (* 1/2 (pow (atan2 x.im x.re) 5))))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (+ (* y.im (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (* (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* y.im (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/2 (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/2 (* y.im (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))))) (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (atan2 x.im x.re))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))))))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* y.im (- (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (atan2 x.im x.re))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (pow (atan2 x.im x.re) 3)) (* 1/2 (pow (atan2 x.im x.re) 3))))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (pow (atan2 x.im x.re) 3)) (* 1/2 (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))) (+ (* -1/2 (pow (atan2 x.im x.re) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))) (+ (* -1 (pow (atan2 x.im x.re) 3)) (* 1/2 (pow (atan2 x.im x.re) 3))))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (+ (* y.im (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (* (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.im (- (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (* (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (neg y.im) #s(hole binary64 (* -1 y.im))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re)))) (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* y.im (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re)))) (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* y.re (atan2 x.im x.re)))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (* (pow y.im 3) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (- (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (/ (PI) y.im)))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* (pow y.im 2) (- (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* (pow y.im 2) (- (/ (sin (* y.re (atan2 x.im x.re))) (pow y.im 2)) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* 1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.im (- (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow y.im 2)))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.im (- (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.re (* (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (pow y.im 3) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (+ (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)) (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* (pow y.im 2) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* (pow y.im 2) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (* (pow y.im 3) (+ (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (pow y.im 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.im)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (pow y.im 2) (- (+ (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (pow y.im 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (/ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.im))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.im (- (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) y.im) (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1/2 (/ (PI) y.im))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* (pow y.im 2) (- (* -1 (/ (- (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im)) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (- (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* -1 (* y.re (atan2 x.im x.re)))) y.im))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* y.re (* (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) y.im)) (* -1 (* y.re (atan2 x.im x.re)))) y.im))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (pow y.im 3))) (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (- (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) y.im)) (* -1 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) y.im)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) y.im)) (* -1 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))))) |
12 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 243.0ms | x.im | @ | 0 | ((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (log x.im) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/ 1 (exp (* y.im (atan2 x.im x.re)))) 1 (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (* x.re x.re) 1/2 (pow (atan2 x.im x.re) 2) 2 (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (/ (PI) 2) (PI) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) 3 (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.im x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (pow (* (atan2 x.im x.re) y.re) 3) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) |
| 241.0ms | x.im | @ | inf | ((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (log x.im) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/ 1 (exp (* y.im (atan2 x.im x.re)))) 1 (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (* x.re x.re) 1/2 (pow (atan2 x.im x.re) 2) 2 (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (/ (PI) 2) (PI) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) 3 (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.im x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (pow (* (atan2 x.im x.re) y.re) 3) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) |
| 208.0ms | x.im | @ | -inf | ((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (log x.im) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/ 1 (exp (* y.im (atan2 x.im x.re)))) 1 (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (* x.re x.re) 1/2 (pow (atan2 x.im x.re) 2) 2 (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (/ (PI) 2) (PI) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) 3 (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.im x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (pow (* (atan2 x.im x.re) y.re) 3) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) |
| 197.0ms | x.re | @ | inf | ((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (log x.im) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/ 1 (exp (* y.im (atan2 x.im x.re)))) 1 (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (* x.re x.re) 1/2 (pow (atan2 x.im x.re) 2) 2 (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (/ (PI) 2) (PI) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) 3 (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.im x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (pow (* (atan2 x.im x.re) y.re) 3) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) |
| 161.0ms | x.re | @ | -inf | ((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (log x.im) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/ 1 (exp (* y.im (atan2 x.im x.re)))) 1 (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (* x.re x.re) 1/2 (pow (atan2 x.im x.re) 2) 2 (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (/ (PI) 2) (PI) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) 3 (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.im x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (pow (* (atan2 x.im x.re) y.re) 3) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 14493 | 589410 |
| 0 | 14776 | 589410 |
| 0 | 14776 | 567228 |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| Inputs |
|---|
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) |
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) |
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) |
(log.f64 (hypot.f64 x.re x.im)) |
(hypot.f64 x.re x.im) |
x.re |
x.im |
y.re |
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(atan2.f64 x.im x.re) |
y.im |
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) |
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (atan2.f64 x.im x.re) y.re) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
(*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(exp.f64 (*.f64 y.re (log.f64 x.im))) |
(*.f64 y.re (log.f64 x.im)) |
(log.f64 x.im) |
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) |
(*.f64 y.im (atan2.f64 x.im x.re)) |
(sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) |
(fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))) |
(*.f64 y.re (atan2.f64 x.im x.re)) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
(fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) |
#s(literal -1/2 binary64) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(literal 1 binary64) |
(*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) |
(log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) |
(pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im) |
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(fma.f64 x.im x.im (*.f64 x.re x.re)) |
(*.f64 x.re x.re) |
#s(literal 1/2 binary64) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) |
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))))))) |
#s(literal -1/6 binary64) |
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
(sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(/.f64 (PI.f64) #s(literal 2 binary64)) |
(PI.f64) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) |
#s(literal 3 binary64) |
(fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))) |
#s(literal 1/6 binary64) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))))) |
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)) |
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)) |
(fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(*.f64 x.im x.im) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
(-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) |
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) |
(*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) |
(neg.f64 y.im) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) |
(*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
(*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))))) |
(sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) |
(pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) |
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) |
(pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) |
(+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) |
(-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.im y.re))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re)))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re)))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im))))))) |
#s(approx x.re #s(hole binary64 x.re)) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re))))) |
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re)))) |
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))) |
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (exp (* y.im (atan2 x.im x.re))))) |
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re)))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) |
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (/ (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (/ (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.re 2) (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (log (pow x.im y.im))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (log (pow x.im y.im))))) (pow x.im 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (+ (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (log (pow x.im y.im)))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/24 (* (pow x.re 2) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* 1/2 (/ y.im (pow x.im 2)))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* 1/720 (* (pow x.re 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow x.im y.im))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (pow x.im y.im))) (pow x.im 2))) (pow x.im y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im))))) (pow x.im y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))) (pow x.im y.im))))))) (pow x.im y.im)))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.im)) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2)))) |
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2))) |
#s(approx (pow (atan2 x.im x.re) 2) #s(hole binary64 (pow (atan2 x.im x.re) 2))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (pow x.im 2))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (log (pow x.im y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (pow x.im 4))) (+ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (pow x.im 2))))) (* (pow (log x.im) 2) (sin (log (pow x.im y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (pow x.im 4))) (+ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (+ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (pow x.im 2)))))) (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (pow x.im 2))))) (* (pow (log x.im) 2) (sin (log (pow x.im y.im))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.im) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)) (pow (log x.im) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (+ (* 1/4 (/ 1 (pow x.im 4))) (* (pow x.re 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.im))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.im))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (/ (pow (atan2 x.im x.re) 3) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (pow (atan2 x.im x.re) 3) #s(hole binary64 (pow (atan2 x.im x.re) 3))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))) (* (pow (log x.im) 3) (sin (log (pow x.im y.im))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))))))))) (* (pow (log x.im) 3) (sin (log (pow x.im y.im))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (+ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))) (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))))))) (* (pow (log x.im) 3) (sin (log (pow x.im y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.im) 3))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (pow (log x.im) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow (log x.im) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (+ (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))))))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow (log x.im) 3)))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (/ (* (pow x.re 2) (* (log x.im) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (/ (* (log x.im) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow x.re 2) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (/ (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log x.im) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow (log x.im) 2) (atan2 x.im x.re)) (/ (* (pow x.re 2) (* (log x.im) (atan2 x.im x.re))) (pow x.im 2))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (/ (* (log x.im) (atan2 x.im x.re)) (pow x.im 2)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))))) (/ (* (log x.im) (atan2 x.im x.re)) (pow x.im 2)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (/ (* (log x.im) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (atan2 x.im x.re) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (atan2 x.im x.re) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (atan2 x.im x.re) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/6 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.im) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* (log x.im) (atan2 x.im x.re)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2))) (* (log x.im) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log x.im) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 4))) (* 1/2 (/ (atan2 x.im x.re) (pow x.im 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log x.im) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (atan2 x.im x.re) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (atan2 x.im x.re) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 6)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (/ (atan2 x.im x.re) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (log x.im) (sin (log (pow x.im y.im)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (pow x.im 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 4))) (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 4))) (+ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 6))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow x.im 2))) (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (log (pow x.im y.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/24 (/ (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2)))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6)))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6)))))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (pow x.re 2) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (pow x.re 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.re 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 6)))))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (pow x.im 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))) (pow x.im 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))))))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (pow x.re 2) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (* (pow x.re 2) (+ (* -1 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.re 2) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.im) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.im) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.im) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* (pow x.re 2) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))) (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 3) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))) (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))) (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (* (pow y.im 3) (pow (log x.im) 3)))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* (pow x.re 2) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow y.im 3) (pow (log x.im) 3))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))) (* (pow y.im 3) (pow (log x.im) 3))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 3) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))) (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))) (* (pow y.im 3) (pow (log x.im) 3))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))) |
#s(approx (pow (* (atan2 x.im x.re) y.re) 3) #s(hole binary64 (* (pow y.re 3) (pow (atan2 x.im x.re) 3)))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2))) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 6))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2))) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log x.im) 2)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow y.im 2) (pow (log x.im) 2)) (/ (* (pow x.re 2) (* (pow y.im 2) (log x.im))) (pow x.im 2))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (* 1/4 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/6 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 6))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 6)))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4)) (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 6))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.re))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.re))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.re)) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)) (+ (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4)) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ 1 x.re)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (pow (log (/ 1 x.re)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 6))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (pow (log (/ 1 x.re)) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)) (pow x.re 4))) (+ (* 1/720 (/ (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 6) (log (/ 1 x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)) (pow x.re 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)) (pow x.re 6)) (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)) (pow x.re 4))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow x.re 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 6)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))))) (pow x.re 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (* (pow x.re 6) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (+ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))) (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (+ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))) (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (pow x.re 6))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4)) (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 6))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.re))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.re))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.re))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)) (+ (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4)) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ -1 x.re)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (pow (log (/ -1 x.re)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.re))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 6))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (pow (log (/ -1 x.re)) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)) (pow x.re 4))) (+ (* 1/720 (/ (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 6) (log (/ -1 x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)) (pow x.re 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)) (pow x.re 6)) (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)) (pow x.re 4))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (pow x.re 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 6)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))))) (pow x.re 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (* (pow x.re 6) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (+ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))) (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (+ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))) (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (pow x.re 6))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.re y.re))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re)))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re)))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re))))))) |
#s(approx x.im #s(hole binary64 x.im)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))))))) |
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (pow x.im y.re))) |
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im)))) |
#s(approx (log x.im) #s(hole binary64 (log x.im))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (/ (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (/ (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.im 2) (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (log (pow x.re y.im))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (log (pow x.re y.im))))) (pow x.re 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (+ (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (log (pow x.re y.im)))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/24 (* (pow x.im 2) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* 1/2 (/ y.im (pow x.re 2)))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* 1/720 (* (pow x.im 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow x.re y.im))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (pow x.re y.im))) (pow x.re 2))) (pow x.re y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im))))) (pow x.re y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))) (pow x.re y.im))))))) (pow x.re y.im)))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (pow x.re 2))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (log (pow x.re y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (pow x.re 4))) (+ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (pow x.re 2))))) (* (pow (log x.re) 2) (sin (log (pow x.re y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (pow x.re 4))) (+ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (+ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (pow x.re 2)))))) (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (pow x.re 2))))) (* (pow (log x.re) 2) (sin (log (pow x.re y.im))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.re) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (/ (* (pow x.im 2) (log x.re)) (pow x.re 2)) (pow (log x.re) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (+ (* 1/4 (/ 1 (pow x.re 4))) (* (pow x.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.re))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.re))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))) (* (pow (log x.re) 3) (sin (log (pow x.re y.im))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))))))))) (* (pow (log x.re) 3) (sin (log (pow x.re y.im))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (+ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))) (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))))))) (* (pow (log x.re) 3) (sin (log (pow x.re y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.re) 3))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (pow (log x.re) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow (log x.re) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (+ (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))))))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow (log x.re) 3)))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log x.re) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (/ (* (pow x.im 2) (* (log x.re) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log x.re) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (/ (* (log x.re) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow x.im 2) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log x.re) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (/ (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.re) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log x.re) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow (log x.re) 2) (atan2 x.im x.re)) (/ (* (pow x.im 2) (* (log x.re) (atan2 x.im x.re))) (pow x.re 2))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (/ (* (log x.re) (atan2 x.im x.re)) (pow x.re 2)))) (* (pow (log x.re) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))))) (/ (* (log x.re) (atan2 x.im x.re)) (pow x.re 2)))) (* (pow (log x.re) 2) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (/ (* (log x.re) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (atan2 x.im x.re) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (atan2 x.im x.re) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (atan2 x.im x.re) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/6 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.re) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* (log x.re) (atan2 x.im x.re)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2))) (* (log x.re) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log x.re) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 4))) (* 1/2 (/ (atan2 x.im x.re) (pow x.re 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log x.re) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (atan2 x.im x.re) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (atan2 x.im x.re) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 6)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (log x.re) (sin (log (pow x.re y.im)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (pow x.re 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 4))) (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 4))) (+ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 6))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow x.re 2))) (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (log (pow x.re y.im))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/24 (/ (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6)))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6)))))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (pow x.im 2) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (pow x.im 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.im 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 6)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (pow x.re 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))) (pow x.re 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))))))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (pow x.im 2) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (* (pow x.im 2) (+ (* -1 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.im 2) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* (pow x.im 2) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))) (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 3) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))) (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))) (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (* (pow y.im 3) (pow (log x.re) 3)))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* (pow x.im 2) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow y.im 3) (pow (log x.re) 3))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))) (* (pow y.im 3) (pow (log x.re) 3))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 3) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))) (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))) (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))) (* (pow y.im 3) (pow (log x.re) 3))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2))) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 6))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2))) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log x.re) 2)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow y.im 2) (pow (log x.re) 2)) (/ (* (pow x.im 2) (* (pow y.im 2) (log x.re))) (pow x.re 2))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (* 1/4 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/6 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 6))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.re 6)))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6))))))))))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im))))))) |
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im)))))) |
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4)) (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 6))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.im))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.im))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)) (+ (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4)) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ 1 x.im)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (pow (log (/ 1 x.im)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 6))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (pow (log (/ 1 x.im)) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)) (pow x.im 4))) (+ (* 1/720 (/ (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 6) (log (/ 1 x.im))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)) (pow x.im 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)) (pow x.im 6)) (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)) (pow x.im 4))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (pow x.im 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 6)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))))) (pow x.im 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (* (pow x.im 6) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (+ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))) (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (+ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))) (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (pow x.im 6))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6))))))))))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))) |
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))) |
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im)))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4)) (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 6))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.im))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.im))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.im))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)) (+ (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4)) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ -1 x.im)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (pow (log (/ -1 x.im)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 6))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (pow (log (/ -1 x.im)) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)) (pow x.im 4))) (+ (* 1/720 (/ (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 6) (log (/ -1 x.im))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)) (pow x.im 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)) (pow x.im 6)) (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)) (pow x.im 4))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (pow x.im 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 6)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))))) (pow x.im 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (* (pow x.im 6) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (+ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (+ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))) (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (+ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))) (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (pow x.im 6))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 1)) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx y.re #s(hole binary64 y.re)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log x.im))) (* (log x.im) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log x.im))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (* y.im (log x.im))) (* (log x.im) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 1)) |
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (log x.im))))) |
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* 1/2 (* y.re (pow (log x.im) 2)))))))) |
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2))))))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.im))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im)))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (* y.re (- (atan2 x.im x.re) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (* y.re (- (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (atan2 x.im x.re)) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (* y.re (- (+ (* y.re (- (* y.re (- (* -1/6 (pow (atan2 x.im x.re) 3)) (* -1 (* y.im (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))))))) (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (atan2 x.im x.re)) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* y.re (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* 1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* y.re (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1 (* y.im (* y.re (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))) (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* y.re (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (+ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* -1/6 (pow (atan2 x.im x.re) 3)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* -1/6 (pow (atan2 x.im x.re) 3)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (- (* -1 (* y.re (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (- (* y.re (- (* -1 (/ (* y.re (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (* (pow y.im 3) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (+ (* (pow y.im 3) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (- (* y.re (pow (atan2 x.im x.re) 2)) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.re (- (* y.re (pow (atan2 x.im x.re) 2)) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* (pow y.re 3) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* (pow y.im 3) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.re (- (+ (* -1 (/ (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))) (pow y.re 2))) (atan2 x.im x.re)) (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.re (- (+ (* -1 (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))))) (* (pow y.re 3) (atan2 x.im x.re)))) (atan2 x.im x.re)) (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (atan2 x.im x.re)))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (atan2 x.im x.re))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (* (pow y.re 3) (pow (atan2 x.im x.re) 3)))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (* (pow y.re 3) (+ (/ (* (pow y.im 3) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow y.re 3)) (pow (atan2 x.im x.re) 3))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.re)) (pow (atan2 x.im x.re) 2))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (pow y.re 2) (- (+ (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)) (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.re))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.re)) (pow (atan2 x.im x.re) 2))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (* -1 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* y.re (exp (* y.im (atan2 x.im x.re))))))) y.re)) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* -1 (/ (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) y.re))) y.re)) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) y.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (* -1/2 (/ (PI) y.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (- (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* y.re (atan2 x.im x.re)))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re)))) (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re)))) y.re)) (* -1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (* (pow y.im 3) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow y.re 3))) (* -1 (pow (atan2 x.im x.re) 3))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (- (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) y.re)) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) y.re)) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 1)) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re))))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) |
#s(approx y.im #s(hole binary64 y.im)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (- (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* 1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re)))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re)))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re)))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 1)) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (+ (* y.im (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.re (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (+ (* y.re (- (+ (* -1/2 (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.im (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (+ (* y.im (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (+ (* y.re (- (+ (* -1/2 (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1/2 (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* y.im (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* y.im (- (+ (* y.im (- (* (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))) (+ (* 1/2 (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (pow (atan2 x.im x.re) 2))) (* (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 1)) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (- (* -1 (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re)))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))) (+ (* -1/2 (pow (atan2 x.im x.re) 3)) (* 1/6 (pow (atan2 x.im x.re) 3)))))) (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* y.im (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* y.im (* (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (atan2 x.im x.re) 2))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.im (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* 1/24 (* y.im (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 1)) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (+ (* y.im (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (* (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* y.im (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* y.im (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* y.im (- (+ (* y.im (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))) (+ (* 1/2 (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (pow (atan2 x.im x.re) 2))) (* (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.im (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* y.im (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (pow (atan2 x.im x.re) 3))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1 (* y.im (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (pow (atan2 x.im x.re) 5)) (* 1/2 (pow (atan2 x.im x.re) 5))))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (pow (atan2 x.im x.re) 5)) (* 1/2 (pow (atan2 x.im x.re) 5))) (atan2 x.im x.re))) (+ (* -1/2 (pow (atan2 x.im x.re) 6)) (* 1/6 (pow (atan2 x.im x.re) 6)))))) (+ (* -1 (pow (atan2 x.im x.re) 5)) (* 1/2 (pow (atan2 x.im x.re) 5))))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (+ (* y.im (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (* (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* y.im (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/2 (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/2 (* y.im (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))))) (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (atan2 x.im x.re))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))))))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* y.im (- (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (atan2 x.im x.re))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (pow (atan2 x.im x.re) 3)) (* 1/2 (pow (atan2 x.im x.re) 3))))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (pow (atan2 x.im x.re) 3)) (* 1/2 (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))) (+ (* -1/2 (pow (atan2 x.im x.re) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))) (+ (* -1 (pow (atan2 x.im x.re) 3)) (* 1/2 (pow (atan2 x.im x.re) 3))))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (+ (* y.im (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (* (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.im (- (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (* (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (neg y.im) #s(hole binary64 (* -1 y.im))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re)))) (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* y.im (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re)))) (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* y.re (atan2 x.im x.re)))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) #s(hole binary64 (* (pow y.im 3) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (- (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (/ (PI) y.im)))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* (pow y.im 2) (- (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* (pow y.im 2) (- (/ (sin (* y.re (atan2 x.im x.re))) (pow y.im 2)) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* 1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.im (- (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow y.im 2)))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.im (- (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.re (* (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (pow y.im 3) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (+ (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)) (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* (pow y.im 2) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* (pow y.im 2) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (* (pow y.im 3) (+ (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (pow y.im 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.im)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (pow y.im 2) (- (+ (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (pow y.im 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (/ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.im))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.im (- (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) y.im) (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1/2 (/ (PI) y.im))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* (pow y.im 2) (- (* -1 (/ (- (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im)) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (- (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* -1 (* y.re (atan2 x.im x.re)))) y.im))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* y.re (* (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) y.im)) (* -1 (* y.re (atan2 x.im x.re)))) y.im))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (pow y.im 3))) (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (- (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) y.im)) (* -1 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) y.im)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) y.im)) (* -1 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))))) |
| Outputs |
|---|
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) |
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) |
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) |
(log.f64 (hypot.f64 x.re x.im)) |
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) |
(hypot.f64 x.re x.im) |
x.re |
x.im |
y.re |
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(atan2.f64 x.im x.re) |
y.im |
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) |
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) |
(+.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (atan2.f64 x.im x.re) y.re) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
(*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(exp.f64 (*.f64 y.re (log.f64 x.im))) |
(*.f64 y.re (log.f64 x.im)) |
(log.f64 x.im) |
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) |
(*.f64 y.im (atan2.f64 x.im x.re)) |
(sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) |
(fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) |
(*.f64 y.re (atan2.f64 x.im x.re)) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
(fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(+.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) |
(+.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) |
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) |
#s(literal -1/2 binary64) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(literal 1 binary64) |
(*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) |
(log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) |
(pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im) |
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(fma.f64 x.im x.im (*.f64 x.re x.re)) |
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) |
(*.f64 x.re x.re) |
#s(literal 1/2 binary64) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))) |
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) |
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))) |
(+.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) |
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))))))) |
(+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))))))) |
#s(literal -1/6 binary64) |
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
(sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(+.f64 (*.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(/.f64 (PI.f64) #s(literal 2 binary64)) |
(PI.f64) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) |
#s(literal 3 binary64) |
(fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))) |
(+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))) |
#s(literal 1/6 binary64) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))))) |
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)) |
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)) |
(fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
(+.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) |
(log.f64 (hypot.f64 x.re x.im)) |
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) |
(hypot.f64 x.re x.im) |
(fma.f64 x.re x.re (*.f64 x.im x.im)) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(*.f64 x.im x.im) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
(-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) |
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) |
(*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) |
(neg.f64 y.im) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) |
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) |
(*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
(*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (fma.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))))) |
(sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (fma.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (fma.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) |
(pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) |
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) |
(pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64)) |
(fma.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) |
(-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) |
(*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 x.im y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 x.im y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.im y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.im y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (pow.f64 x.im y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 x.im y.re)) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 x.im y.re))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im)) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx x.re x.re) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re))) |
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))) |
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (pow.f64 x.im y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* y.im (atan2 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (log.f64 (pow.f64 x.im y.im))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (+.f64 (log.f64 (pow.f64 x.im y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (+.f64 (log.f64 (pow.f64 x.im y.im)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (+.f64 (log.f64 (pow.f64 x.im y.im)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 x.im y.im)) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (pow.f64 x.im y.im))) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 x.im y.im))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.im y.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.im)))) (pow.f64 x.im y.im))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.im y.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.im)))))) (pow.f64 x.im y.im))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.im) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) |
#s(approx (* x.re x.re) (pow.f64 x.re #s(literal 2 binary64))) |
#s(approx (pow (atan2 x.im x.re) 2) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (+.f64 (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.im)) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (log.f64 x.im))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (pow (atan2 x.im x.re) 3) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (+.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))))))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (/.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 (log.f64 x.im) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (atan2.f64 x.im x.re) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 (log.f64 x.im) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (atan2.f64 x.im x.re) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (atan2.f64 x.im x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (/.f64 (atan2.f64 x.im x.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (pow.f64 x.im #s(literal 2 binary64))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))))))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))))))))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.im))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (log.f64 x.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))) |
#s(approx (pow (* (atan2 x.im x.re) y.re) 3) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im))) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64)))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.re) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.re #s(literal 2 binary64))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re) (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (pow.f64 x.re #s(literal 2 binary64))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.re)) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re) (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 x.re y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 x.re y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.re y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.re y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (pow.f64 x.re y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 x.re y.re)) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 x.re y.re))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re)) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx x.im x.im) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (exp (* y.re (log x.im))) (pow.f64 x.im y.re)) |
#s(approx (* y.re (log x.im)) (*.f64 y.re (log.f64 x.im))) |
#s(approx (log x.im) (log.f64 x.im)) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (log.f64 (pow.f64 x.re y.im))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (+.f64 (log.f64 (pow.f64 x.re y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (+.f64 (log.f64 (pow.f64 x.re y.im)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (+.f64 (log.f64 (pow.f64 x.re y.im)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 x.re y.im)) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (pow.f64 x.re y.im))) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 x.re y.im))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.re y.im)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.im)))) (pow.f64 x.re y.im))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.re y.im)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.im) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.im)))))) (pow.f64 x.re y.im))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (+.f64 (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.re)) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (log.f64 x.re))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (+.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))))))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (/.f64 (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 (log.f64 x.re) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (atan2.f64 x.im x.re) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 (log.f64 x.re) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (atan2.f64 x.im x.re) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (atan2.f64 x.im x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* x.im x.im) (pow.f64 x.im #s(literal 2 binary64))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))))))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))))))))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.re))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (log.f64 x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re))) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (+.f64 (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64)))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (* y.re (log x.im))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (* y.re (log x.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) |
#s(approx (log x.im) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re) (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (* y.re (log x.im))) (exp.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) |
#s(approx (* y.re (log x.im)) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) |
#s(approx (log x.im) (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.im)) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re) (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx y.re y.re) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (+.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (log.f64 x.im)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (log.f64 x.im) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (log.f64 x.im) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (exp (* y.re (log x.im))) #s(literal 1 binary64)) |
#s(approx (exp (* y.re (log x.im))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im)))) |
#s(approx (exp (* y.re (log x.im))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))))) |
#s(approx (exp (* y.re (log x.im))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 x.im) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (*.f64 y.re (-.f64 (atan2.f64 x.im x.re) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (*.f64 y.re (-.f64 (fma.f64 y.re (-.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re)))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))) (atan2.f64 x.im x.re)))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (atan2.f64 x.im x.re)))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal 1/120 binary64) (*.f64 y.im (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 y.im (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))))) (*.f64 #s(literal 1/120 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 y.re (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (-.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (-.f64 (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (*.f64 y.re (-.f64 (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re) (atan2.f64 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (atan2.f64 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re) (atan2.f64 x.im x.re)))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (pow.f64 y.re #s(literal 3 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 y.re #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) y.re)))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) y.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) y.re)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) y.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.re)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (pow.f64 y.re #s(literal 3 binary64))) (*.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(literal 1 binary64)) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re))))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) |
#s(approx y.im y.im) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) |
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re)) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re))) |
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(literal 1 binary64)) |
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)))))) |
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (-.f64 (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 y.re (-.f64 (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 y.re (-.f64 (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.im (-.f64 (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64)) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (atan2.f64 x.im x.re))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 y.im (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))))))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(literal 1 binary64)) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (fma.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 y.im (fma.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 y.im (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 y.im (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))))))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 y.im (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (fma.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 y.im (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (atan2.f64 x.im x.re)) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (fma.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.im (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (neg y.im) (*.f64 #s(literal -1 binary64) y.im)) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im) (atan2.f64 x.im x.re)))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.im (-.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 y.im #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.im (-.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 y.im #s(literal 3 binary64))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) y.im) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 y.im #s(literal 2 binary64))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) y.im)))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (*.f64 y.im (-.f64 (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.im) (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 x.im) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.im)))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) y.im)) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) y.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)))))) |
#s(approx (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) |
#s(approx (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) y.im) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) |
#s(approx (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) |
Compiled 2 009 195 to 41 527 computations (97.9% saved)
14 alts after pruning (12 fresh and 2 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 5 074 | 12 | 5 086 |
| Fresh | 8 | 0 | 8 |
| Picked | 3 | 2 | 5 |
| Done | 0 | 0 | 0 |
| Total | 5 085 | 14 | 5 099 |
| Status | Accuracy | Program |
|---|---|---|
| 25.2% | (*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 31.5% | (*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| ▶ | 56.8% | (*.f64 (/.f64 #s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| 39.6% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) | |
| ✓ | 20.6% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))))) |
| 54.5% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))) | |
| ▶ | 34.5% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
| 36.8% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) | |
| ▶ | 34.3% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
| 32.5% | (*.f64 (exp.f64 #s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) | |
| ▶ | 9.4% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
| 7.4% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) | |
| ✓ | 30.0% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
| ▶ | 19.9% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
Compiled 4 352 to 1 429 computations (67.2% saved)
| Inputs |
|---|
(*.f64 (/.f64 #s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 #s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) |
#s(literal 1 binary64) |
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(atan2.f64 x.im x.re) |
x.im |
x.re |
y.im |
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) |
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) |
(log.f64 (hypot.f64 x.re x.im)) |
(hypot.f64 x.re x.im) |
(*.f64 (atan2.f64 x.im x.re) y.re) |
y.re |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(literal -1 binary64) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
(log.f64 (/.f64 #s(literal 1 binary64) x.re)) |
(/.f64 #s(literal 1 binary64) x.re) |
(sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
(*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
(*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) |
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) |
(*.f64 y.im (atan2.f64 x.im x.re)) |
(fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) |
(*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) |
(sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(*.f64 #s(literal 1/2 binary64) (PI.f64)) |
#s(literal 1/2 binary64) |
(PI.f64) |
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(literal -1/2 binary64) |
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
(/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
(pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) |
(*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
(+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
(*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(literal -1/6 binary64) |
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) |
#s(literal 3 binary64) |
(+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
(*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
(pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) |
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) |
(exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
(-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))) |
(*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) |
(*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) |
(log.f64 (/.f64 #s(literal -1 binary64) x.im)) |
(/.f64 #s(literal -1 binary64) x.im) |
(sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) |
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) |
(fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
(*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) |
(pow.f64 y.im #s(literal 3 binary64)) |
(pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) |
(*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
(pow.f64 y.re #s(literal 3 binary64)) |
(-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) |
(fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(pow.f64 y.im #s(literal 2 binary64)) |
(pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) |
(*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(pow.f64 y.re #s(literal 2 binary64)) |
(*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) |
(*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) |
(*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) |
(*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(*.f64 x.re x.re) |
(*.f64 x.im x.im) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
(-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) |
(*.f64 y.re (atan2.f64 x.im x.re)) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
(*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
(/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) |
(sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) |
(+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) |
(pow.f64 x.im #s(literal 2 binary64)) |
(pow.f64 x.re #s(literal 2 binary64)) |
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) |
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))) |
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
(pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
(-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) |
(*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) |
(neg.f64 y.im) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) |
(*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) |
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(fma.f64 x.im x.im (*.f64 x.re x.re)) |
(*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
(+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
(fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) |
(*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
(*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) |
| Outputs |
|---|
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.im y.re))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re)))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re)))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re)))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re))))) |
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re)))) |
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re))) |
#s(approx x.re #s(hole binary64 x.re)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (/ (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log x.re) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* -1 (* (log x.re) (sin (* y.im (log x.re))))))) |
#s(approx (log (/ 1 x.re)) #s(hole binary64 (* -1 (log x.re)))) |
#s(approx (/ 1 x.re) #s(hole binary64 (/ 1 x.re))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (sin (* y.im (log x.re))))) |
#s(approx (* -1 (* y.im (log (/ 1 x.re)))) #s(hole binary64 (* y.im (log x.re)))) |
#s(approx (* y.im (log (/ 1 x.re))) #s(hole binary64 (* -1 (* y.im (log x.re))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (exp (* y.im (atan2 x.im x.re))))) |
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.re))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (pow (atan2 x.im x.re) 2) #s(hole binary64 (pow (atan2 x.im x.re) 2))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (pow (log x.re) 2) (sin (* y.im (log x.re)))))) |
#s(approx (pow (log (/ 1 x.re)) 2) #s(hole binary64 (pow (log x.re) 2))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (pow (atan2 x.im x.re) 3) #s(hole binary64 (pow (atan2 x.im x.re) 3))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* -1 (* (pow (log x.re) 3) (sin (* y.im (log x.re))))))) |
#s(approx (pow (log (/ 1 x.re)) 3) #s(hole binary64 (* -1 (pow (log x.re) 3)))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (sin (* y.im (log x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (pow x.im 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))) (pow x.im 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))))))))))))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (pow y.re 3) (pow (atan2 x.im x.re) 3)))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) |
#s(approx (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) #s(hole binary64 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) |
#s(approx (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) |
#s(approx (* (log (/ -1 x.im)) (atan2 x.im x.re)) #s(hole binary64 (* (log (/ -1 x.im)) (atan2 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2)))) |
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6)))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6)))))))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow x.re 2) (* (pow y.im 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (* 1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* (pow y.im 2) (+ (* -1 (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (+ (* 1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) y.im))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow y.im 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (* 1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) (* (pow y.im 2) (+ (* -1 (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (+ (* -1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 6) y.im))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (* (pow y.im 2) (+ (* 1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) y.im))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))) (* (pow y.im 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (* 1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) (* (pow y.im 2) (+ (* -1 (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (* 1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (+ (* 1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) y.im))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (+ (* 1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) y.im))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.re 2) (+ (* -1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 6) y.im))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 4) y.im))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))))) (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) y.im))) (* 1/6 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 6) y.im))))))) (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 6)))))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (log x.im))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 x.im)) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (pow x.im 2))) |
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2)))) |
#s(approx (pow x.re 2) #s(hole binary64 (pow x.re 2))) |
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* 1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/2 (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log x.im) 2))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)) (pow (log x.im) 2)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (+ (* 1/4 (/ 1 (pow x.im 4))) (* (pow x.re 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2)))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (pow x.re 2) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (pow x.re 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.re 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.im) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)) (pow (log x.im) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (+ (* 1/4 (/ 1 (pow x.im 4))) (* (pow x.re 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.im))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.im)) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2)))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 6)))))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))) |
#s(approx (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) |
#s(approx (log (/ 1 x.re)) #s(hole binary64 (log (/ 1 x.re)))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.re))))))) |
#s(approx (* -1 (* y.im (log (/ 1 x.re)))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (* y.im (log (/ 1 x.re))) #s(hole binary64 (* y.im (log (/ 1 x.re))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) |
#s(approx (pow (log (/ 1 x.re)) 2) #s(hole binary64 (pow (log (/ 1 x.re)) 2))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) |
#s(approx (pow (log (/ 1 x.re)) 3) #s(hole binary64 (pow (log (/ 1 x.re)) 3))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))))) (pow x.re 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.re 2))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (+ (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.re 2)) (/ (* (pow y.im 2) (+ (* 1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 4)))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (+ (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.re 2)) (+ (/ (* (pow y.im 2) (+ (* -1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 4))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 4) y.im))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.im))) (+ (* 1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 4) y.im))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im)))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 4) y.im))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 4) y.im))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.im))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 x.re)) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (pow x.re 2))) |
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log (/ 1 x.re)) 2))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (pow (log (/ 1 x.re)) 2)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2)))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ 1 x.re)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (pow (log (/ 1 x.re)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.re)) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))))) |
#s(approx (log (/ 1 x.re)) #s(hole binary64 (+ (log -1) (log (/ -1 x.re))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))))) |
#s(approx (* -1 (* y.im (log (/ 1 x.re)))) #s(hole binary64 (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))))) |
#s(approx (* y.im (log (/ 1 x.re))) #s(hole binary64 (* y.im (+ (log -1) (log (/ -1 x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)))) |
#s(approx (pow (log (/ 1 x.re)) 2) #s(hole binary64 (pow (+ (log -1) (log (/ -1 x.re))) 2))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (* y.re (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)))) |
#s(approx (pow (log (/ 1 x.re)) 3) #s(hole binary64 (pow (+ (log -1) (log (/ -1 x.re))) 3))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))))) (pow x.re 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.re 2))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (+ (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.re 2)) (/ (* (pow y.im 2) (+ (* 1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 4)))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (+ (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.re 2)) (+ (/ (* (pow y.im 2) (+ (* -1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 4))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 4) y.im))) (+ (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.im))) (+ (* 1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 4) y.im))) (+ (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im)))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 4) y.im))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 4) y.im))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.im))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ -1 x.re))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 x.re))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log (/ -1 x.re)) 2))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (pow (log (/ -1 x.re)) 2)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2)))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ -1 x.re)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (pow (log (/ -1 x.re)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.re))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.re))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.re y.re))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re)))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re)))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re)))) |
#s(approx x.im #s(hole binary64 x.im)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (/ (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (pow x.re 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))) (pow x.re 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))))))))))))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (+ (log -1) (* -1 (log x.im))))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (+ (log -1) (* -1 (log x.im))) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (+ (log -1) (* -1 (log x.im))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (+ (log -1) (* -1 (log x.im))) (atan2 x.im x.re))))))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (+ (log -1) (* -1 (log x.im))))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (+ (log -1) (* -1 (log x.im))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* -1 (* y.re (log (/ -1 x.im)))) #s(hole binary64 (* -1 (* y.re (+ (log -1) (* -1 (log x.im))))))) |
#s(approx (* y.re (log (/ -1 x.im))) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log x.im)))))) |
#s(approx (log (/ -1 x.im)) #s(hole binary64 (+ (log -1) (* -1 (log x.im))))) |
#s(approx (/ -1 x.im) #s(hole binary64 (/ -1 x.im))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (+ (log -1) (* -1 (log x.im))) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (+ (log -1) (* -1 (log x.im))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (+ (log -1) (* -1 (log x.im))) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (+ (log -1) (* -1 (log x.im))) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (+ (log -1) (* -1 (log x.im))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (+ (log -1) (* -1 (log x.im))) (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (+ (log -1) (* -1 (log x.im))) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) #s(hole binary64 (* (pow y.im 3) (pow (+ (log -1) (* -1 (log x.im))) 3)))) |
#s(approx (pow (log (/ -1 x.im)) 3) #s(hole binary64 (pow (+ (log -1) (* -1 (log x.im))) 3))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (+ (log -1) (* -1 (log x.im))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (+ (log -1) (* -1 (log x.im))) (atan2 x.im x.re)))))))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow y.im 2) (pow (+ (log -1) (* -1 (log x.im))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (pow (log (/ -1 x.im)) 2) #s(hole binary64 (pow (+ (log -1) (* -1 (log x.im))) 2))) |
#s(approx (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* y.re (* (+ (log -1) (* -1 (log x.im))) (atan2 x.im x.re))))))) |
#s(approx (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) #s(hole binary64 (* y.im (* y.re (* (+ (log -1) (* -1 (log x.im))) (atan2 x.im x.re)))))) |
#s(approx (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (+ (log -1) (* -1 (log x.im))) (atan2 x.im x.re))))) |
#s(approx (* (log (/ -1 x.im)) (atan2 x.im x.re)) #s(hole binary64 (* (+ (log -1) (* -1 (log x.im))) (atan2 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))) |
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6)))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6)))))))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow x.im 2) (* (pow y.im 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (* 1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* (pow y.im 2) (+ (* -1 (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (+ (* 1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) y.im))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow y.im 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (* 1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) (* (pow y.im 2) (+ (* -1 (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (+ (* -1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 6) y.im))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (* (pow y.im 2) (+ (* 1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) y.im))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))) (* (pow y.im 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (* 1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) (* (pow y.im 2) (+ (* -1 (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (* 1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (+ (* 1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) y.im))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (+ (* 1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) y.im))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.im 2) (+ (* -1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 6) y.im))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 4) y.im))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))))) (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) y.im))) (* 1/6 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 6) y.im))))))) (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 6)))))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (log x.re))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (pow x.im 2) #s(hole binary64 (pow x.im 2))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* 1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/2 (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log x.re) 2))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (/ (* (pow x.im 2) (log x.re)) (pow x.re 2)) (pow (log x.re) 2)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (+ (* 1/4 (/ 1 (pow x.re 4))) (* (pow x.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2)))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (pow x.im 2) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (pow x.im 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.im 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.re) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (/ (* (pow x.im 2) (log x.re)) (pow x.re 2)) (pow (log x.re) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (+ (* 1/4 (/ 1 (pow x.re 4))) (* (pow x.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.re))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 6)))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))))) (pow x.im 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (+ (log -1) (log (/ 1 x.im))))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (+ (log -1) (log (/ 1 x.im))) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (+ (log -1) (log (/ 1 x.im))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (+ (log -1) (log (/ 1 x.im))) (atan2 x.im x.re))))))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (+ (log -1) (log (/ 1 x.im))))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (+ (log -1) (log (/ 1 x.im))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* -1 (* y.re (log (/ -1 x.im)))) #s(hole binary64 (* -1 (* y.re (+ (log -1) (log (/ 1 x.im))))))) |
#s(approx (* y.re (log (/ -1 x.im))) #s(hole binary64 (* y.re (+ (log -1) (log (/ 1 x.im)))))) |
#s(approx (log (/ -1 x.im)) #s(hole binary64 (+ (log -1) (log (/ 1 x.im))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (+ (log -1) (log (/ 1 x.im))) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (+ (log -1) (log (/ 1 x.im))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (+ (log -1) (log (/ 1 x.im))) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (+ (log -1) (log (/ 1 x.im))) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (+ (log -1) (log (/ 1 x.im))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (+ (log -1) (log (/ 1 x.im))) (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (+ (log -1) (log (/ 1 x.im))) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) #s(hole binary64 (* (pow y.im 3) (pow (+ (log -1) (log (/ 1 x.im))) 3)))) |
#s(approx (pow (log (/ -1 x.im)) 3) #s(hole binary64 (pow (+ (log -1) (log (/ 1 x.im))) 3))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (+ (log -1) (log (/ 1 x.im))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (+ (log -1) (log (/ 1 x.im))) (atan2 x.im x.re)))))))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow y.im 2) (pow (+ (log -1) (log (/ 1 x.im))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (pow (log (/ -1 x.im)) 2) #s(hole binary64 (pow (+ (log -1) (log (/ 1 x.im))) 2))) |
#s(approx (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* y.re (* (+ (log -1) (log (/ 1 x.im))) (atan2 x.im x.re))))))) |
#s(approx (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) #s(hole binary64 (* y.im (* y.re (* (+ (log -1) (log (/ 1 x.im))) (atan2 x.im x.re)))))) |
#s(approx (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (+ (log -1) (log (/ 1 x.im))) (atan2 x.im x.re))))) |
#s(approx (* (log (/ -1 x.im)) (atan2 x.im x.re)) #s(hole binary64 (* (+ (log -1) (log (/ 1 x.im))) (atan2 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.im 2))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (+ (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.im 2)) (/ (* (pow y.im 2) (+ (* 1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 4)))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (+ (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.im 2)) (+ (/ (* (pow y.im 2) (+ (* -1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 4))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 4) y.im))) (+ (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.im))) (+ (* 1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 4) y.im))) (+ (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im)))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 4) y.im))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 4) y.im))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.im))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log (/ 1 x.im)) 2))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (pow (log (/ 1 x.im)) 2)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2)))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ 1 x.im)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (pow (log (/ 1 x.im)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))))) (pow x.im 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))))))) |
#s(approx (* -1 (* y.re (log (/ -1 x.im)))) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im)))))) |
#s(approx (* y.re (log (/ -1 x.im))) #s(hole binary64 (* y.re (log (/ -1 x.im))))) |
#s(approx (log (/ -1 x.im)) #s(hole binary64 (log (/ -1 x.im)))) |
#s(approx (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) #s(hole binary64 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)))) |
#s(approx (pow (log (/ -1 x.im)) 3) #s(hole binary64 (pow (log (/ -1 x.im)) 3))) |
#s(approx (pow (log (/ -1 x.im)) 2) #s(hole binary64 (pow (log (/ -1 x.im)) 2))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.im 2))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (+ (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.im 2)) (/ (* (pow y.im 2) (+ (* 1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 4)))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (+ (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.im 2)) (+ (/ (* (pow y.im 2) (+ (* -1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 4))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 4) y.im))) (+ (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.im))) (+ (* 1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 4) y.im))) (+ (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im)))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 4) y.im))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 4) y.im))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.im))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 x.im))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log (/ -1 x.im)) 2))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (pow (log (/ -1 x.im)) 2)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2)))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ -1 x.im)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (pow (log (/ -1 x.im)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.im))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 1)) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) |
#s(approx y.re #s(hole binary64 y.re)) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (+ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* -1/6 (pow (atan2 x.im x.re) 3)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ -1 x.im))))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (+ (* y.re (+ (* -1 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))))) (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ -1 x.im))))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (+ (* y.re (+ (* -1 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (+ (* -1 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))))) (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (/ (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)) (* y.im (log (/ -1 x.im)))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))))) (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ -1 x.im))))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* -1 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (/ -1 x.im)))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (/ -1 x.im)) 2))))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* y.re (+ (* -1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (/ -1 x.im)) 2)))))))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.im))))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* y.re (+ (* y.re (+ (* -1 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))))) (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* y.re (+ (* y.re (+ (* -1 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))))) (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (/ (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)) (* y.im (log (/ -1 x.im)))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im)))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (- (* -1 (* y.re (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))))) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (- (* y.re (- (/ (* y.re (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))) (* y.im (log (/ -1 x.im)))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))))) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))))) |
#s(approx (pow y.re 3) #s(hole binary64 (pow y.re 3))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (- (* y.re (pow (atan2 x.im x.re) 2)) (* -1 (* y.im (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)))) |
#s(approx (pow y.re 2) #s(hole binary64 (pow y.re 2))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (* y.re (- (atan2 x.im x.re) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (* y.re (- (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (atan2 x.im x.re)) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (* y.re (- (+ (* y.re (- (* y.re (- (* -1/6 (pow (atan2 x.im x.re) 3)) (* -1 (* y.im (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))))))) (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (atan2 x.im x.re)) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* y.re (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* 1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* y.re (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1 (* y.im (* y.re (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))) (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* (pow y.im 2) (* y.re (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* y.re (+ (* 1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* (pow y.im 2) (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* y.re (+ (* y.re (+ (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow y.im 2) (* y.re (+ (* -1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) y.im))))))) (* (pow y.im 2) (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))) y.im)))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))) y.im)) (* y.re (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))) y.im)) (* y.re (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.im)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* 1/2 (/ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.im)))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))) y.im)) (* y.re (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.im)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* 1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) y.im)) (* y.re (+ (* -1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) y.im)))))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))) y.im))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (/ (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) y.im) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))) y.im)))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.im)) (/ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.im))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))) y.im)))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) y.im)) (* -1/6 (/ (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) y.im)))) (/ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.im))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))) y.im)))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* 1/2 (PI)))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/12 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/240 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)))))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/10080 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7)))) (* 1/240 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))))))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* y.re (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) #s(hole binary64 (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* (pow y.re 3) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (pow y.re 3) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im)))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (log (/ -1 x.im))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.re (- (+ (* -1 (/ (+ (* -1 (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (atan2 x.im x.re))) (pow y.re 2))) (atan2 x.im x.re)) (/ (* y.im (log (/ -1 x.im))) y.re))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.re (- (+ (/ (* y.im (* (log (/ -1 x.im)) (+ (* -1 (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (atan2 x.im x.re))))) (* (pow y.re 3) (atan2 x.im x.re))) (atan2 x.im x.re)) (+ (* -1 (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (atan2 x.im x.re)))) (+ (/ (* y.im (log (/ -1 x.im))) y.re) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (pow y.re 3) (pow (atan2 x.im x.re) 3)))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (pow y.re 3))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (+ (/ (* y.im (* (log (/ -1 x.im)) (atan2 x.im x.re))) y.re) (pow (atan2 x.im x.re) 2))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (- (+ (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)) (* -1 (/ (* y.im (* (log (/ -1 x.im)) (atan2 x.im x.re))) y.re)))))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (+ (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (* (pow y.re 3) (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (+ (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (/ (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (pow y.re 2))))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (+ (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (/ (sin (* 1/2 (PI))) (pow y.re 3)) (/ (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (pow y.re 2)))))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) #s(hole binary64 (* -1/6 (* (pow y.re 3) (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (+ (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (/ (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (pow y.re 2))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) #s(hole binary64 (* -1/6 (* (pow y.re 2) (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (+ (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (/ (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (pow y.re 2))))))) |
#s(approx (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (* -1 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* y.re (exp (* y.im (atan2 x.im x.re))))))) y.re)) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (* -1 (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* y.re (exp (* y.im (atan2 x.im x.re))))))) y.re)) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) y.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) y.re))) y.re)) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (* -1 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) y.re)) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) y.re))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) y.re))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (log (/ -1 x.im)) (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (/ (* y.im (log (/ -1 x.im))) y.re)))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (- (+ (* -1 (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* y.re (atan2 x.im x.re)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* y.re (atan2 x.im x.re)))) (* y.im (log (/ -1 x.im)))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (- (* -1 (/ (- (/ (* y.im (* (log (/ -1 x.im)) (+ (* -1 (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (atan2 x.im x.re)))) y.re)) (* y.im (log (/ -1 x.im)))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (pow (atan2 x.im x.re) 3)) (/ (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (pow y.re 3))))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (- (* -1 (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) y.re)) (* y.im (* (log (/ -1 x.im)) (atan2 x.im x.re)))) y.re)) (pow (atan2 x.im x.re) 2))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (* -1/2 (/ (PI) y.re))))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* 1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (/ (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re)) (* 1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* -1 (/ (sin (* 1/2 (PI))) y.re))) y.re)) (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (* 1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* 1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (/ (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re)) (* 1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (/ (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))) |
#s(approx (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (* -1 (* y.re (+ (* 1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 1)) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re))))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) |
#s(approx y.im #s(hole binary64 y.im)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (+ (* y.im (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.re (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (+ (* y.re (- (+ (* -1/2 (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ 1 x.re))) (* y.re (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ 1 x.re))) (+ (* y.im (- (* y.re (- (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))) (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* y.re (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ 1 x.re))) (+ (* y.im (- (+ (* y.im (- (+ (* 1/6 (pow (log (/ 1 x.re)) 3)) (* y.re (- (+ (* -1 (- (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))))) (+ (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* y.re (- (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* y.re (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (- (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))))) (+ (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 2))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* y.im (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* y.im (- (* y.im (- (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* (- (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/6 (pow (log (/ 1 x.re)) 4))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 2))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* 1/6 (* (pow y.im 2) (pow (log (/ 1 x.re)) 4))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (pow (log (/ 1 x.re)) 6))) (* 1/6 (pow (log (/ 1 x.re)) 4)))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* (pow y.im 2) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* (pow y.im 2) (+ (* -1/120 (pow (log (/ 1 x.re)) 6)) (* 1/5040 (* (pow y.im 2) (pow (log (/ 1 x.re)) 8))))))))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/6 (* (pow y.im 2) (pow (log (/ 1 x.re)) 3))))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (pow (log (/ 1 x.re)) 5))) (* 1/6 (pow (log (/ 1 x.re)) 3)))))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* (pow y.im 2) (+ (* 1/6 (pow (log (/ 1 x.re)) 3)) (* (pow y.im 2) (+ (* -1/120 (pow (log (/ 1 x.re)) 5)) (* 1/5040 (* (pow y.im 2) (pow (log (/ 1 x.re)) 7))))))))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 1)) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))) (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4)))))))))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))) (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (+ (* y.im (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (+ (* y.im (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))))))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))))))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1 (* y.im (* (cos (* 1/2 (PI))) (log (/ 1 x.re)))))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* 1/2 (PI))))))))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* 1/2 (PI))))) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (pow (log (/ 1 x.re)) 3))))))))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (* 1/2 (PI)))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (+ (* y.im (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (+ (* y.im (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4)))))))))))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.im (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.im (- (* y.im (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 5))) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 5))) (* (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4)))) (atan2 x.im x.re)))))) (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))))))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* 1/6 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 5) (pow (atan2 x.im x.re) 2)))) (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/120 (* (pow (log (/ 1 x.re)) 5) (pow (atan2 x.im x.re) 2))) (* 1/5040 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 7) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* y.im (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* y.im (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (+ (* y.im (+ (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 3))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* y.im (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* y.im (- (* y.im (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3))) (* (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/6 (pow (log (/ 1 x.re)) 5))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 3))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* 1/6 (* (pow y.im 2) (pow (log (/ 1 x.re)) 5))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (pow (log (/ 1 x.re)) 7))) (* 1/6 (pow (log (/ 1 x.re)) 5)))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* (pow y.im 2) (+ (* 1/6 (pow (log (/ 1 x.re)) 5)) (* (pow y.im 2) (+ (* -1/120 (pow (log (/ 1 x.re)) 7)) (* 1/5040 (* (pow y.im 2) (pow (log (/ 1 x.re)) 9))))))))))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* y.im (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* y.im (* y.re (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4)))))))))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))))))))))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/6 (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))))) (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))))) (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* y.im (+ (* -1/6 (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))))))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3))))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))))))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/6 (* y.im (pow (log (/ 1 x.re)) 4))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (* -1/6 (* y.im (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (* 1/6 (pow (log (/ 1 x.re)) 4)))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* y.im (+ (* -1/6 (* y.im (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2)))))) (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (* 1/6 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 3))) (* (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 4))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* y.im (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* y.im (- (* y.im (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 3))) (* (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/6 (pow (log (/ 1 x.re)) 6))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 4))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* 1/6 (* (pow y.im 2) (pow (log (/ 1 x.re)) 6))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (pow (log (/ 1 x.re)) 8))) (* 1/6 (pow (log (/ 1 x.re)) 6)))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* (pow y.im 2) (+ (* 1/6 (pow (log (/ 1 x.re)) 6)) (* (pow y.im 2) (+ (* -1/120 (pow (log (/ 1 x.re)) 8)) (* 1/5040 (* (pow y.im 2) (pow (log (/ 1 x.re)) 10))))))))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4)))))))))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* y.im (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* y.im (- (* y.im (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))) (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 5))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 5))) (* (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4)))) (atan2 x.im x.re)))))) (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))) (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* y.im (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* 1/6 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2)))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 6) (pow (atan2 x.im x.re) 2)))) (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/120 (* (pow (log (/ 1 x.re)) 6) (pow (atan2 x.im x.re) 2))) (* 1/5040 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 8) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/2 (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/2 (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re))))))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* y.im (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* y.im (- (* y.im (- (* 1/6 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (* (- (* 1/6 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/6 (pow (log (/ 1 x.re)) 3))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re)))) (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (atan2 x.im x.re)))) (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/6 (pow (log (/ -1 x.im)) 3)) (/ (* (log (/ -1 x.im)) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* -1 (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (* 1/2 (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1 (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/6 (pow (log (/ -1 x.im)) 3)) (/ (* (log (/ -1 x.im)) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re))))))))))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))))) (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (* y.im (- (/ (* y.im (* (log (/ -1 x.im)) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))))) (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))))) (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (pow y.im 3) #s(hole binary64 (pow y.im 3))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (* y.im (pow (log (/ -1 x.im)) 2)) (* -1 (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (pow y.im 2) #s(hole binary64 (pow y.im 2))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (/ (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) y.im))) |
#s(approx (neg y.im) #s(hole binary64 (* -1 y.im))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (PI) y.im)))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.im (- (* -1 (/ (* y.re (log (/ -1 x.im))) y.im)) (atan2 x.im x.re))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (- (+ (* -1 (log (/ -1 x.im))) (* -1 (/ (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (/ -1 x.im)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (/ -1 x.im)))) (pow y.im 2)))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (- (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (* (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (/ -1 x.im)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (/ -1 x.im)))) (atan2 x.im x.re))) (* (pow y.im 3) (log (/ -1 x.im))))) (+ (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)) (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* (pow y.im 2) (log (/ -1 x.im))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* (pow y.im 2) (log (/ -1 x.im)))))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (pow y.im 3)))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.im 2) (+ (/ (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))) y.im) (pow (log (/ -1 x.im)) 2))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.im 2) (- (+ (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (pow y.im 2)) (pow (log (/ -1 x.im)) 2)) (* -1 (/ (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))) y.im)))))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.im 2) (+ (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (pow y.im 2)) (pow (log (/ -1 x.im)) 2))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* (pow y.im 2) (- (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* (pow y.im 2) (- (/ (sin (* y.re (atan2 x.im x.re))) (pow y.im 2)) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* 1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* 1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (* -1 (* y.im (+ (log (/ 1 x.re)) (* -1/2 (/ (PI) y.im))))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (- (/ (* y.re (log (/ -1 x.im))) y.im) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (log (/ -1 x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (log (/ -1 x.im)) (* -1 (/ (- (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* y.im (log (/ -1 x.im))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* y.im (log (/ -1 x.im))))) (* -1 (* y.re (atan2 x.im x.re)))) y.im))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (log (/ -1 x.im)) (* -1 (/ (- (* -1 (/ (- (/ (* y.re (* (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (/ -1 x.im)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (/ -1 x.im)))) (atan2 x.im x.re))) (* y.im (log (/ -1 x.im)))) (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (/ -1 x.im)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (/ -1 x.im))))) y.im)) (* -1 (* y.re (atan2 x.im x.re)))) y.im))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (pow y.im 3))) (pow (log (/ -1 x.im)) 3)))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (- (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) y.im)) (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) y.im)) (pow (log (/ -1 x.im)) 2))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* (pow y.im 2) (- (* -1 (/ (- (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im)) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
12 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 268.0ms | x.re | @ | 0 | ((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) 1 (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) x.im x.re y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (atan2 x.im x.re) y.re) y.re (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (log (/ 1 x.re)) (/ 1 x.re) (sin (* -1 (* y.im (log (/ 1 x.re))))) (* -1 (* y.im (log (/ 1 x.re)))) (* y.im (log (/ 1 x.re))) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (PI) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (pow (atan2 x.im x.re) 2) 2 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow (log (/ 1 x.re)) 2) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) 3 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow (log (/ 1 x.re)) 3) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))) (* y.re (log (/ -1 x.im))) (log (/ -1 x.im)) (/ -1 x.im) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (pow y.im 3) (pow (log (/ -1 x.im)) 3) (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (pow y.re 3) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (pow y.im 2) (pow (log (/ -1 x.im)) 2) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (pow y.re 2) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* (log (/ -1 x.im)) (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sqrt (+ (pow x.im 2) (pow x.re 2))) (+ (pow x.im 2) (pow x.re 2)) (pow x.im 2) (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (cos (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) |
| 121.0ms | x.im | @ | inf | ((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) 1 (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) x.im x.re y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (atan2 x.im x.re) y.re) y.re (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (log (/ 1 x.re)) (/ 1 x.re) (sin (* -1 (* y.im (log (/ 1 x.re))))) (* -1 (* y.im (log (/ 1 x.re)))) (* y.im (log (/ 1 x.re))) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (PI) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (pow (atan2 x.im x.re) 2) 2 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow (log (/ 1 x.re)) 2) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) 3 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow (log (/ 1 x.re)) 3) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))) (* y.re (log (/ -1 x.im))) (log (/ -1 x.im)) (/ -1 x.im) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (pow y.im 3) (pow (log (/ -1 x.im)) 3) (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (pow y.re 3) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (pow y.im 2) (pow (log (/ -1 x.im)) 2) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (pow y.re 2) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* (log (/ -1 x.im)) (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sqrt (+ (pow x.im 2) (pow x.re 2))) (+ (pow x.im 2) (pow x.re 2)) (pow x.im 2) (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (cos (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) |
| 102.0ms | y.im | @ | 0 | ((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) 1 (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) x.im x.re y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (atan2 x.im x.re) y.re) y.re (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (log (/ 1 x.re)) (/ 1 x.re) (sin (* -1 (* y.im (log (/ 1 x.re))))) (* -1 (* y.im (log (/ 1 x.re)))) (* y.im (log (/ 1 x.re))) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (PI) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (pow (atan2 x.im x.re) 2) 2 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow (log (/ 1 x.re)) 2) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) 3 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow (log (/ 1 x.re)) 3) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))) (* y.re (log (/ -1 x.im))) (log (/ -1 x.im)) (/ -1 x.im) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (pow y.im 3) (pow (log (/ -1 x.im)) 3) (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (pow y.re 3) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (pow y.im 2) (pow (log (/ -1 x.im)) 2) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (pow y.re 2) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* (log (/ -1 x.im)) (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sqrt (+ (pow x.im 2) (pow x.re 2))) (+ (pow x.im 2) (pow x.re 2)) (pow x.im 2) (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (cos (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) |
| 94.0ms | y.im | @ | inf | ((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) 1 (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) x.im x.re y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (atan2 x.im x.re) y.re) y.re (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (log (/ 1 x.re)) (/ 1 x.re) (sin (* -1 (* y.im (log (/ 1 x.re))))) (* -1 (* y.im (log (/ 1 x.re)))) (* y.im (log (/ 1 x.re))) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (PI) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (pow (atan2 x.im x.re) 2) 2 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow (log (/ 1 x.re)) 2) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) 3 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow (log (/ 1 x.re)) 3) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))) (* y.re (log (/ -1 x.im))) (log (/ -1 x.im)) (/ -1 x.im) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (pow y.im 3) (pow (log (/ -1 x.im)) 3) (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (pow y.re 3) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (pow y.im 2) (pow (log (/ -1 x.im)) 2) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (pow y.re 2) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* (log (/ -1 x.im)) (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sqrt (+ (pow x.im 2) (pow x.re 2))) (+ (pow x.im 2) (pow x.re 2)) (pow x.im 2) (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (cos (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) |
| 92.0ms | y.im | @ | -inf | ((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) 1 (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) x.im x.re y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (atan2 x.im x.re) y.re) y.re (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (log (/ 1 x.re)) (/ 1 x.re) (sin (* -1 (* y.im (log (/ 1 x.re))))) (* -1 (* y.im (log (/ 1 x.re)))) (* y.im (log (/ 1 x.re))) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (PI) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (pow (atan2 x.im x.re) 2) 2 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow (log (/ 1 x.re)) 2) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) 3 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow (log (/ 1 x.re)) 3) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))) (* y.re (log (/ -1 x.im))) (log (/ -1 x.im)) (/ -1 x.im) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (pow y.im 3) (pow (log (/ -1 x.im)) 3) (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (pow y.re 3) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (pow y.im 2) (pow (log (/ -1 x.im)) 2) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (pow y.re 2) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* (log (/ -1 x.im)) (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sqrt (+ (pow x.im 2) (pow x.re 2))) (+ (pow x.im 2) (pow x.re 2)) (pow x.im 2) (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (cos (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 9967 | 251117 |
| 0 | 10322 | 251117 |
| 0 | 10322 | 242991 |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| Inputs |
|---|
(*.f64 (/.f64 #s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 #s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) |
#s(literal 1 binary64) |
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(atan2.f64 x.im x.re) |
x.im |
x.re |
y.im |
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) |
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) |
(log.f64 (hypot.f64 x.re x.im)) |
(hypot.f64 x.re x.im) |
(*.f64 (atan2.f64 x.im x.re) y.re) |
y.re |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(literal -1 binary64) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
(log.f64 (/.f64 #s(literal 1 binary64) x.re)) |
(/.f64 #s(literal 1 binary64) x.re) |
(sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
(*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
(*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) |
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) |
(*.f64 y.im (atan2.f64 x.im x.re)) |
(fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) |
(*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) |
(sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(*.f64 #s(literal 1/2 binary64) (PI.f64)) |
#s(literal 1/2 binary64) |
(PI.f64) |
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(literal -1/2 binary64) |
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
(/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
(pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) |
(*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
(+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
(*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(literal -1/6 binary64) |
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) |
#s(literal 3 binary64) |
(+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
(*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
(pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) |
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) |
(exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
(-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))) |
(*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) |
(*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) |
(log.f64 (/.f64 #s(literal -1 binary64) x.im)) |
(/.f64 #s(literal -1 binary64) x.im) |
(sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) |
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) |
(fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
(*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) |
(pow.f64 y.im #s(literal 3 binary64)) |
(pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) |
(*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
(pow.f64 y.re #s(literal 3 binary64)) |
(-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) |
(fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(pow.f64 y.im #s(literal 2 binary64)) |
(pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) |
(*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(pow.f64 y.re #s(literal 2 binary64)) |
(*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) |
(*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) |
(*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) |
(*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(*.f64 x.re x.re) |
(*.f64 x.im x.im) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
(-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) |
(*.f64 y.re (atan2.f64 x.im x.re)) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
(*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
(/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) |
(sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) |
(+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) |
(pow.f64 x.im #s(literal 2 binary64)) |
(pow.f64 x.re #s(literal 2 binary64)) |
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) |
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))) |
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
(pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
(-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) |
(*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) |
(neg.f64 y.im) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) |
(*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) |
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(fma.f64 x.im x.im (*.f64 x.re x.re)) |
(*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
(+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
(fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) |
(*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
(*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.im y.re))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re)))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re)))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re)))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re))))) |
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re)))) |
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re))) |
#s(approx x.re #s(hole binary64 x.re)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (/ (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log x.re) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* -1 (* (log x.re) (sin (* y.im (log x.re))))))) |
#s(approx (log (/ 1 x.re)) #s(hole binary64 (* -1 (log x.re)))) |
#s(approx (/ 1 x.re) #s(hole binary64 (/ 1 x.re))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (sin (* y.im (log x.re))))) |
#s(approx (* -1 (* y.im (log (/ 1 x.re)))) #s(hole binary64 (* y.im (log x.re)))) |
#s(approx (* y.im (log (/ 1 x.re))) #s(hole binary64 (* -1 (* y.im (log x.re))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (exp (* y.im (atan2 x.im x.re))))) |
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.re))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (pow (atan2 x.im x.re) 2) #s(hole binary64 (pow (atan2 x.im x.re) 2))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (pow (log x.re) 2) (sin (* y.im (log x.re)))))) |
#s(approx (pow (log (/ 1 x.re)) 2) #s(hole binary64 (pow (log x.re) 2))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (pow (atan2 x.im x.re) 3) #s(hole binary64 (pow (atan2 x.im x.re) 3))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* -1 (* (pow (log x.re) 3) (sin (* y.im (log x.re))))))) |
#s(approx (pow (log (/ 1 x.re)) 3) #s(hole binary64 (* -1 (pow (log x.re) 3)))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (sin (* y.im (log x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (pow x.im 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))) (pow x.im 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))))))))))))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (pow y.re 3) (pow (atan2 x.im x.re) 3)))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) |
#s(approx (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) #s(hole binary64 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) |
#s(approx (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) |
#s(approx (* (log (/ -1 x.im)) (atan2 x.im x.re)) #s(hole binary64 (* (log (/ -1 x.im)) (atan2 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2)))) |
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6)))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6)))))))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow x.re 2) (* (pow y.im 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (* 1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* (pow y.im 2) (+ (* -1 (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (+ (* 1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) y.im))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow y.im 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (* 1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) (* (pow y.im 2) (+ (* -1 (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (+ (* -1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 6) y.im))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (* (pow y.im 2) (+ (* 1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) y.im))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))) (* (pow y.im 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (* 1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) (* (pow y.im 2) (+ (* -1 (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (* 1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (+ (* 1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) y.im))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (+ (* 1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) y.im))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.re 2) (+ (* -1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 6) y.im))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 4) y.im))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))))) (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) y.im))) (* 1/6 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 6) y.im))))))) (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 6)))))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (log x.im))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 x.im)) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (pow x.im 2))) |
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2)))) |
#s(approx (pow x.re 2) #s(hole binary64 (pow x.re 2))) |
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* 1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/2 (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log x.im) 2))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)) (pow (log x.im) 2)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (+ (* 1/4 (/ 1 (pow x.im 4))) (* (pow x.re 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2)))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (pow x.re 2) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (pow x.re 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.re 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.im) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)) (pow (log x.im) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (+ (* 1/4 (/ 1 (pow x.im 4))) (* (pow x.re 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.im))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.im)) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2)))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 6)))))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))) |
#s(approx (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) |
#s(approx (log (/ 1 x.re)) #s(hole binary64 (log (/ 1 x.re)))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.re))))))) |
#s(approx (* -1 (* y.im (log (/ 1 x.re)))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (* y.im (log (/ 1 x.re))) #s(hole binary64 (* y.im (log (/ 1 x.re))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) |
#s(approx (pow (log (/ 1 x.re)) 2) #s(hole binary64 (pow (log (/ 1 x.re)) 2))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) |
#s(approx (pow (log (/ 1 x.re)) 3) #s(hole binary64 (pow (log (/ 1 x.re)) 3))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))))) (pow x.re 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.re 2))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (+ (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.re 2)) (/ (* (pow y.im 2) (+ (* 1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 4)))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (+ (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.re 2)) (+ (/ (* (pow y.im 2) (+ (* -1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 4))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 4) y.im))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.im))) (+ (* 1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 4) y.im))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im)))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 4) y.im))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 4) y.im))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.im))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 x.re)) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (pow x.re 2))) |
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log (/ 1 x.re)) 2))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (pow (log (/ 1 x.re)) 2)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2)))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ 1 x.re)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (pow (log (/ 1 x.re)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.re)) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))))) |
#s(approx (log (/ 1 x.re)) #s(hole binary64 (+ (log -1) (log (/ -1 x.re))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))))) |
#s(approx (* -1 (* y.im (log (/ 1 x.re)))) #s(hole binary64 (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))))) |
#s(approx (* y.im (log (/ 1 x.re))) #s(hole binary64 (* y.im (+ (log -1) (log (/ -1 x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)))) |
#s(approx (pow (log (/ 1 x.re)) 2) #s(hole binary64 (pow (+ (log -1) (log (/ -1 x.re))) 2))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (* y.re (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)))) |
#s(approx (pow (log (/ 1 x.re)) 3) #s(hole binary64 (pow (+ (log -1) (log (/ -1 x.re))) 3))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))))) (pow x.re 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.re 2))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (+ (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.re 2)) (/ (* (pow y.im 2) (+ (* 1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 4)))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (+ (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.re 2)) (+ (/ (* (pow y.im 2) (+ (* -1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 4))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 4) y.im))) (+ (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.im))) (+ (* 1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 4) y.im))) (+ (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im)))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 4) y.im))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 4) y.im))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.im))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ -1 x.re))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 x.re))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log (/ -1 x.re)) 2))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (pow (log (/ -1 x.re)) 2)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2)))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ -1 x.re)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (pow (log (/ -1 x.re)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.re))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.re))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.re y.re))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re)))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re)))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re)))) |
#s(approx x.im #s(hole binary64 x.im)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (/ (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (pow x.re 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))) (pow x.re 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))))))))))))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (+ (log -1) (* -1 (log x.im))))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (+ (log -1) (* -1 (log x.im))) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (+ (log -1) (* -1 (log x.im))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (+ (log -1) (* -1 (log x.im))) (atan2 x.im x.re))))))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (+ (log -1) (* -1 (log x.im))))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (+ (log -1) (* -1 (log x.im))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* -1 (* y.re (log (/ -1 x.im)))) #s(hole binary64 (* -1 (* y.re (+ (log -1) (* -1 (log x.im))))))) |
#s(approx (* y.re (log (/ -1 x.im))) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log x.im)))))) |
#s(approx (log (/ -1 x.im)) #s(hole binary64 (+ (log -1) (* -1 (log x.im))))) |
#s(approx (/ -1 x.im) #s(hole binary64 (/ -1 x.im))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (+ (log -1) (* -1 (log x.im))) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (+ (log -1) (* -1 (log x.im))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (+ (log -1) (* -1 (log x.im))) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (+ (log -1) (* -1 (log x.im))) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (+ (log -1) (* -1 (log x.im))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (+ (log -1) (* -1 (log x.im))) (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (+ (log -1) (* -1 (log x.im))) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) #s(hole binary64 (* (pow y.im 3) (pow (+ (log -1) (* -1 (log x.im))) 3)))) |
#s(approx (pow (log (/ -1 x.im)) 3) #s(hole binary64 (pow (+ (log -1) (* -1 (log x.im))) 3))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (+ (log -1) (* -1 (log x.im))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (+ (log -1) (* -1 (log x.im))) (atan2 x.im x.re)))))))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow y.im 2) (pow (+ (log -1) (* -1 (log x.im))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (pow (log (/ -1 x.im)) 2) #s(hole binary64 (pow (+ (log -1) (* -1 (log x.im))) 2))) |
#s(approx (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* y.re (* (+ (log -1) (* -1 (log x.im))) (atan2 x.im x.re))))))) |
#s(approx (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) #s(hole binary64 (* y.im (* y.re (* (+ (log -1) (* -1 (log x.im))) (atan2 x.im x.re)))))) |
#s(approx (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (+ (log -1) (* -1 (log x.im))) (atan2 x.im x.re))))) |
#s(approx (* (log (/ -1 x.im)) (atan2 x.im x.re)) #s(hole binary64 (* (+ (log -1) (* -1 (log x.im))) (atan2 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))) |
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6)))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6)))))))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow x.im 2) (* (pow y.im 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (* 1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* (pow y.im 2) (+ (* -1 (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (+ (* 1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) y.im))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow y.im 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (* 1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) (* (pow y.im 2) (+ (* -1 (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (+ (* -1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 6) y.im))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (* (pow y.im 2) (+ (* 1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) y.im))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))) (* (pow y.im 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (* 1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) (* (pow y.im 2) (+ (* -1 (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (* 1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (+ (* 1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) y.im))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (+ (* 1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) y.im))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.im 2) (+ (* -1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 6) y.im))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 4) y.im))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))))) (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) y.im))) (* 1/6 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 6) y.im))))))) (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 6)))))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (log x.re))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (pow x.im 2) #s(hole binary64 (pow x.im 2))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* 1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/2 (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log x.re) 2))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (/ (* (pow x.im 2) (log x.re)) (pow x.re 2)) (pow (log x.re) 2)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (+ (* 1/4 (/ 1 (pow x.re 4))) (* (pow x.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2)))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (pow x.im 2) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (pow x.im 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.im 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.re) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (/ (* (pow x.im 2) (log x.re)) (pow x.re 2)) (pow (log x.re) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (+ (* 1/4 (/ 1 (pow x.re 4))) (* (pow x.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.re))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 6)))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))))) (pow x.im 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (+ (log -1) (log (/ 1 x.im))))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (+ (log -1) (log (/ 1 x.im))) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (+ (log -1) (log (/ 1 x.im))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (+ (log -1) (log (/ 1 x.im))) (atan2 x.im x.re))))))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (+ (log -1) (log (/ 1 x.im))))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (+ (log -1) (log (/ 1 x.im))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* -1 (* y.re (log (/ -1 x.im)))) #s(hole binary64 (* -1 (* y.re (+ (log -1) (log (/ 1 x.im))))))) |
#s(approx (* y.re (log (/ -1 x.im))) #s(hole binary64 (* y.re (+ (log -1) (log (/ 1 x.im)))))) |
#s(approx (log (/ -1 x.im)) #s(hole binary64 (+ (log -1) (log (/ 1 x.im))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (+ (log -1) (log (/ 1 x.im))) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (+ (log -1) (log (/ 1 x.im))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (+ (log -1) (log (/ 1 x.im))) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (+ (log -1) (log (/ 1 x.im))) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (+ (log -1) (log (/ 1 x.im))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (+ (log -1) (log (/ 1 x.im))) (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1 (* (pow y.im 3) (pow (+ (log -1) (log (/ 1 x.im))) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) #s(hole binary64 (* (pow y.im 3) (pow (+ (log -1) (log (/ 1 x.im))) 3)))) |
#s(approx (pow (log (/ -1 x.im)) 3) #s(hole binary64 (pow (+ (log -1) (log (/ 1 x.im))) 3))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (+ (log -1) (log (/ 1 x.im))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (+ (log -1) (log (/ 1 x.im))) (atan2 x.im x.re)))))))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow y.im 2) (pow (+ (log -1) (log (/ 1 x.im))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (pow (log (/ -1 x.im)) 2) #s(hole binary64 (pow (+ (log -1) (log (/ 1 x.im))) 2))) |
#s(approx (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* y.re (* (+ (log -1) (log (/ 1 x.im))) (atan2 x.im x.re))))))) |
#s(approx (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) #s(hole binary64 (* y.im (* y.re (* (+ (log -1) (log (/ 1 x.im))) (atan2 x.im x.re)))))) |
#s(approx (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (+ (log -1) (log (/ 1 x.im))) (atan2 x.im x.re))))) |
#s(approx (* (log (/ -1 x.im)) (atan2 x.im x.re)) #s(hole binary64 (* (+ (log -1) (log (/ 1 x.im))) (atan2 x.im x.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.im 2))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (+ (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.im 2)) (/ (* (pow y.im 2) (+ (* 1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 4)))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (+ (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.im 2)) (+ (/ (* (pow y.im 2) (+ (* -1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 4))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 4) y.im))) (+ (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.im))) (+ (* 1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 4) y.im))) (+ (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im)))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 4) y.im))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 4) y.im))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.im))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log (/ 1 x.im)) 2))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (pow (log (/ 1 x.im)) 2)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2)))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ 1 x.im)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (pow (log (/ 1 x.im)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))))) (pow x.im 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))))))) |
#s(approx (* -1 (* y.re (log (/ -1 x.im)))) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im)))))) |
#s(approx (* y.re (log (/ -1 x.im))) #s(hole binary64 (* y.re (log (/ -1 x.im))))) |
#s(approx (log (/ -1 x.im)) #s(hole binary64 (log (/ -1 x.im)))) |
#s(approx (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) #s(hole binary64 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)))) |
#s(approx (pow (log (/ -1 x.im)) 3) #s(hole binary64 (pow (log (/ -1 x.im)) 3))) |
#s(approx (pow (log (/ -1 x.im)) 2) #s(hole binary64 (pow (log (/ -1 x.im)) 2))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.im 2))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (+ (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.im 2)) (/ (* (pow y.im 2) (+ (* 1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 4)))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* (pow y.im 2) (+ (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) (+ (/ (* (pow y.im 2) (+ (* -1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) (pow x.im 2)) (+ (/ (* (pow y.im 2) (+ (* -1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 4))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 4) y.im))) (+ (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.im))) (+ (* 1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 4) y.im))) (+ (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im)))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 4) y.im))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 4) y.im))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.im))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 x.im))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log (/ -1 x.im)) 2))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (pow (log (/ -1 x.im)) 2)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2)))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ -1 x.im)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (pow (log (/ -1 x.im)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.im))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 1)) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) |
#s(approx y.re #s(hole binary64 y.re)) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (+ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* -1/6 (pow (atan2 x.im x.re) 3)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ -1 x.im))))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (+ (* y.re (+ (* -1 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))))) (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ -1 x.im))))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (+ (* y.re (+ (* -1 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (+ (* -1 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))))) (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (/ (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)) (* y.im (log (/ -1 x.im)))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))))) (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ -1 x.im))))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* -1 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (/ -1 x.im)))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (/ -1 x.im)) 2))))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* y.re (+ (* -1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (/ -1 x.im)) 2)))))))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.im))))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* y.re (+ (* y.re (+ (* -1 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))))) (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* y.re (+ (* y.re (+ (* -1 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))))) (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (/ (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)) (* y.im (log (/ -1 x.im)))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im)))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (- (* -1 (* y.re (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))))) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (- (* y.re (- (/ (* y.re (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))) (* y.im (log (/ -1 x.im)))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (/ -1 x.im))))))) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))))) |
#s(approx (pow y.re 3) #s(hole binary64 (pow y.re 3))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (- (* y.re (pow (atan2 x.im x.re) 2)) (* -1 (* y.im (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)))) |
#s(approx (pow y.re 2) #s(hole binary64 (pow y.re 2))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (* y.re (- (atan2 x.im x.re) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (* y.re (- (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (atan2 x.im x.re)) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (* y.re (- (+ (* y.re (- (* y.re (- (* -1/6 (pow (atan2 x.im x.re) 3)) (* -1 (* y.im (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))))))) (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (atan2 x.im x.re)) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* y.re (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* 1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* y.re (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1 (* y.im (* y.re (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))) (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* (pow y.im 2) (* y.re (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* y.re (+ (* 1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* (pow y.im 2) (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* y.re (+ (* y.re (+ (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow y.im 2) (* y.re (+ (* -1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) y.im))))))) (* (pow y.im 2) (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))) y.im)))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))) y.im)) (* y.re (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))) y.im)) (* y.re (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.im)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* 1/2 (/ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.im)))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))) y.im)) (* y.re (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.im)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* 1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) y.im)) (* y.re (+ (* -1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) y.im)))))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))) y.im))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (/ (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) y.im) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))) y.im)))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.im)) (/ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.im))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))) y.im)))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) y.im)) (* -1/6 (/ (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) y.im)))) (/ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) y.im))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))) y.im)))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* 1/2 (PI)))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/12 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/240 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)))))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/10080 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7)))) (* 1/240 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))))))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* y.re (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) #s(hole binary64 (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* (pow y.re 3) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (pow y.re 3) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im)))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (log (/ -1 x.im))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.re (- (+ (* -1 (/ (+ (* -1 (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (atan2 x.im x.re))) (pow y.re 2))) (atan2 x.im x.re)) (/ (* y.im (log (/ -1 x.im))) y.re))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.re (- (+ (/ (* y.im (* (log (/ -1 x.im)) (+ (* -1 (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (atan2 x.im x.re))))) (* (pow y.re 3) (atan2 x.im x.re))) (atan2 x.im x.re)) (+ (* -1 (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (atan2 x.im x.re)))) (+ (/ (* y.im (log (/ -1 x.im))) y.re) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (pow y.re 3) (pow (atan2 x.im x.re) 3)))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (pow y.re 3))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (+ (/ (* y.im (* (log (/ -1 x.im)) (atan2 x.im x.re))) y.re) (pow (atan2 x.im x.re) 2))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (- (+ (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)) (* -1 (/ (* y.im (* (log (/ -1 x.im)) (atan2 x.im x.re))) y.re)))))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (+ (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (* (pow y.re 3) (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (+ (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (/ (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (pow y.re 2))))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (+ (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (/ (sin (* 1/2 (PI))) (pow y.re 3)) (/ (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (pow y.re 2)))))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) #s(hole binary64 (* -1/6 (* (pow y.re 3) (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (+ (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (/ (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (pow y.re 2))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) #s(hole binary64 (* -1/6 (* (pow y.re 2) (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (+ (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (/ (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (pow y.re 2))))))) |
#s(approx (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (* -1 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* y.re (exp (* y.im (atan2 x.im x.re))))))) y.re)) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (* -1 (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* y.re (exp (* y.im (atan2 x.im x.re))))))) y.re)) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) y.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) y.re))) y.re)) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (* -1 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) y.re)) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) y.re))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) y.re))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (log (/ -1 x.im)) (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (/ (* y.im (log (/ -1 x.im))) y.re)))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (- (+ (* -1 (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* y.re (atan2 x.im x.re)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* y.re (atan2 x.im x.re)))) (* y.im (log (/ -1 x.im)))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (- (* -1 (/ (- (/ (* y.im (* (log (/ -1 x.im)) (+ (* -1 (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (atan2 x.im x.re)))) y.re)) (* y.im (log (/ -1 x.im)))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (pow (atan2 x.im x.re) 3)) (/ (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (pow y.re 3))))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (- (* -1 (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) y.re)) (* y.im (* (log (/ -1 x.im)) (atan2 x.im x.re)))) y.re)) (pow (atan2 x.im x.re) 2))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (* -1/2 (/ (PI) y.re))))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* 1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (/ (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re)) (* 1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* -1 (/ (sin (* 1/2 (PI))) y.re))) y.re)) (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (* 1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* 1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (/ (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re)) (* 1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (/ (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))) |
#s(approx (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (* -1 (* y.re (+ (* 1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 1)) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re))))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) |
#s(approx y.im #s(hole binary64 y.im)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (+ (* y.im (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.re (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (+ (* y.re (- (+ (* -1/2 (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ 1 x.re))) (* y.re (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ 1 x.re))) (+ (* y.im (- (* y.re (- (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))) (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* y.re (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ 1 x.re))) (+ (* y.im (- (+ (* y.im (- (+ (* 1/6 (pow (log (/ 1 x.re)) 3)) (* y.re (- (+ (* -1 (- (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))))) (+ (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* y.re (- (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* y.re (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (- (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))))) (+ (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 2))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* y.im (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* y.im (- (* y.im (- (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* (- (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/6 (pow (log (/ 1 x.re)) 4))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 2))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* 1/6 (* (pow y.im 2) (pow (log (/ 1 x.re)) 4))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (pow (log (/ 1 x.re)) 6))) (* 1/6 (pow (log (/ 1 x.re)) 4)))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* (pow y.im 2) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* (pow y.im 2) (+ (* -1/120 (pow (log (/ 1 x.re)) 6)) (* 1/5040 (* (pow y.im 2) (pow (log (/ 1 x.re)) 8))))))))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/6 (* (pow y.im 2) (pow (log (/ 1 x.re)) 3))))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (pow (log (/ 1 x.re)) 5))) (* 1/6 (pow (log (/ 1 x.re)) 3)))))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* (pow y.im 2) (+ (* 1/6 (pow (log (/ 1 x.re)) 3)) (* (pow y.im 2) (+ (* -1/120 (pow (log (/ 1 x.re)) 5)) (* 1/5040 (* (pow y.im 2) (pow (log (/ 1 x.re)) 7))))))))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 1)) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))) (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4)))))))))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))) (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (+ (* y.im (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (+ (* y.im (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))))))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))))))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1 (* y.im (* (cos (* 1/2 (PI))) (log (/ 1 x.re)))))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* 1/2 (PI))))))))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* 1/2 (PI))))) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (pow (log (/ 1 x.re)) 3))))))))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (* 1/2 (PI)))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (+ (* y.im (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (+ (* y.im (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4)))))))))))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.im (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.im (- (* y.im (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 5))) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 5))) (* (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4)))) (atan2 x.im x.re)))))) (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))))))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* 1/6 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 5) (pow (atan2 x.im x.re) 2)))) (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/120 (* (pow (log (/ 1 x.re)) 5) (pow (atan2 x.im x.re) 2))) (* 1/5040 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 7) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* y.im (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* y.im (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (+ (* y.im (+ (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 3))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* y.im (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* y.im (- (* y.im (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3))) (* (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/6 (pow (log (/ 1 x.re)) 5))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 3))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* 1/6 (* (pow y.im 2) (pow (log (/ 1 x.re)) 5))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (pow (log (/ 1 x.re)) 7))) (* 1/6 (pow (log (/ 1 x.re)) 5)))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* (pow y.im 2) (+ (* 1/6 (pow (log (/ 1 x.re)) 5)) (* (pow y.im 2) (+ (* -1/120 (pow (log (/ 1 x.re)) 7)) (* 1/5040 (* (pow y.im 2) (pow (log (/ 1 x.re)) 9))))))))))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* y.im (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* y.im (* y.re (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4)))))))))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))))))))))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/6 (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))))) (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))))) (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* y.im (+ (* -1/6 (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))))))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3))))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))))))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/6 (* y.im (pow (log (/ 1 x.re)) 4))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (* -1/6 (* y.im (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (* 1/6 (pow (log (/ 1 x.re)) 4)))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* y.im (+ (* -1/6 (* y.im (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2)))))) (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (* 1/6 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 3))) (* (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 4))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* y.im (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* y.im (- (* y.im (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 3))) (* (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/6 (pow (log (/ 1 x.re)) 6))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 4))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* 1/6 (* (pow y.im 2) (pow (log (/ 1 x.re)) 6))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (pow (log (/ 1 x.re)) 8))) (* 1/6 (pow (log (/ 1 x.re)) 6)))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* (pow y.im 2) (+ (* 1/6 (pow (log (/ 1 x.re)) 6)) (* (pow y.im 2) (+ (* -1/120 (pow (log (/ 1 x.re)) 8)) (* 1/5040 (* (pow y.im 2) (pow (log (/ 1 x.re)) 10))))))))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4)))))))))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* y.im (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* y.im (- (* y.im (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))) (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 5))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 5))) (* (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4)))) (atan2 x.im x.re)))))) (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))) (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* y.im (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* 1/6 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2)))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 6) (pow (atan2 x.im x.re) 2)))) (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/120 (* (pow (log (/ 1 x.re)) 6) (pow (atan2 x.im x.re) 2))) (* 1/5040 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 8) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/2 (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/2 (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re))))))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* y.im (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* y.im (- (* y.im (- (* 1/6 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (* (- (* 1/6 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/6 (pow (log (/ 1 x.re)) 3))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re)))) (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (atan2 x.im x.re)))) (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/6 (pow (log (/ -1 x.im)) 3)) (/ (* (log (/ -1 x.im)) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* -1 (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (* 1/2 (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1 (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/6 (pow (log (/ -1 x.im)) 3)) (/ (* (log (/ -1 x.im)) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re))))))))))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))))) (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (* y.im (- (/ (* y.im (* (log (/ -1 x.im)) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))))) (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (/ -1 x.im)) 2) (* y.re (atan2 x.im x.re)))))) (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) |
#s(approx (pow y.im 3) #s(hole binary64 (pow y.im 3))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (* y.im (pow (log (/ -1 x.im)) 2)) (* -1 (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (pow y.im 2) #s(hole binary64 (pow y.im 2))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (/ (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) y.im))) |
#s(approx (neg y.im) #s(hole binary64 (* -1 y.im))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (PI) y.im)))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.im (- (* -1 (/ (* y.re (log (/ -1 x.im))) y.im)) (atan2 x.im x.re))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (- (+ (* -1 (log (/ -1 x.im))) (* -1 (/ (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (/ -1 x.im)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (/ -1 x.im)))) (pow y.im 2)))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (- (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (* (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (/ -1 x.im)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (/ -1 x.im)))) (atan2 x.im x.re))) (* (pow y.im 3) (log (/ -1 x.im))))) (+ (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)) (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* (pow y.im 2) (log (/ -1 x.im))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* (pow y.im 2) (log (/ -1 x.im)))))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (pow y.im 3)))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.im 2) (+ (/ (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))) y.im) (pow (log (/ -1 x.im)) 2))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.im 2) (- (+ (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (pow y.im 2)) (pow (log (/ -1 x.im)) 2)) (* -1 (/ (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))) y.im)))))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.im 2) (+ (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (pow y.im 2)) (pow (log (/ -1 x.im)) 2))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* (pow y.im 2) (- (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* (pow y.im 2) (- (/ (sin (* y.re (atan2 x.im x.re))) (pow y.im 2)) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* 1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* 1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (* -1 (* y.im (+ (log (/ 1 x.re)) (* -1/2 (/ (PI) y.im))))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (- (/ (* y.re (log (/ -1 x.im))) y.im) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (log (/ -1 x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (log (/ -1 x.im)) (* -1 (/ (- (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* y.im (log (/ -1 x.im))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* y.im (log (/ -1 x.im))))) (* -1 (* y.re (atan2 x.im x.re)))) y.im))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (log (/ -1 x.im)) (* -1 (/ (- (* -1 (/ (- (/ (* y.re (* (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (/ -1 x.im)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (/ -1 x.im)))) (atan2 x.im x.re))) (* y.im (log (/ -1 x.im)))) (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (/ -1 x.im)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (/ -1 x.im))))) y.im)) (* -1 (* y.re (atan2 x.im x.re)))) y.im))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (pow y.im 3))) (pow (log (/ -1 x.im)) 3)))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (- (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) y.im)) (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) y.im)) (pow (log (/ -1 x.im)) 2))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* (pow y.im 2) (- (* -1 (/ (- (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im)) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
| Outputs |
|---|
(*.f64 (/.f64 #s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(/.f64 #s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) |
#s(literal 1 binary64) |
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(atan2.f64 x.im x.re) |
x.im |
x.re |
y.im |
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) |
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) |
(+.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)) |
(log.f64 (hypot.f64 x.re x.im)) |
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) |
(hypot.f64 x.re x.im) |
(*.f64 (atan2.f64 x.im x.re) y.re) |
y.re |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(+.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(literal -1 binary64) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
(log.f64 (/.f64 #s(literal 1 binary64) x.re)) |
(/.f64 #s(literal 1 binary64) x.re) |
(sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
(*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
(*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) |
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) |
(*.f64 y.im (atan2.f64 x.im x.re)) |
(fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(+.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
(+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) |
(*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) |
(sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(*.f64 #s(literal 1/2 binary64) (PI.f64)) |
#s(literal 1/2 binary64) |
(PI.f64) |
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
(+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(literal -1/2 binary64) |
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
(+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
(/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
(pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) |
(*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
(fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
(+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
(*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(literal -1/6 binary64) |
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) |
#s(literal 3 binary64) |
(fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
(+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
(*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
(pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) |
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) |
(exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
(-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))) |
(*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) |
(*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) |
(log.f64 (/.f64 #s(literal -1 binary64) x.im)) |
(/.f64 #s(literal -1 binary64) x.im) |
(sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) |
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) |
(fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
(+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
(*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) |
(pow.f64 y.im #s(literal 3 binary64)) |
(pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) |
(*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
(pow.f64 y.re #s(literal 3 binary64)) |
(-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) |
(fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(+.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(pow.f64 y.im #s(literal 2 binary64)) |
(pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) |
(*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(pow.f64 y.re #s(literal 2 binary64)) |
(*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) |
(*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) |
(*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) |
(*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) |
(log.f64 (hypot.f64 x.re x.im)) |
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) |
(hypot.f64 x.re x.im) |
(fma.f64 x.re x.re (*.f64 x.im x.im)) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(*.f64 x.re x.re) |
(*.f64 x.im x.im) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
(-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) |
(*.f64 y.re (atan2.f64 x.im x.re)) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
(*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
(+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
(/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) |
(sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) |
(+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) |
(pow.f64 x.im #s(literal 2 binary64)) |
(pow.f64 x.re #s(literal 2 binary64)) |
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) |
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 y.re (atan2.f64 x.im x.re))) |
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
(pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
(-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) |
(*.f64 (neg.f64 y.im) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) |
(neg.f64 y.im) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) |
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) |
(*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) |
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(fma.f64 x.im x.im (*.f64 x.re x.re)) |
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) |
(*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
(+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
(fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) |
(+.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) |
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) |
(*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
(*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 x.im y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 x.im y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.im y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.im y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (pow.f64 x.im y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 x.im y.re)) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 x.im y.re))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re))) |
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re)) |
#s(approx x.re x.re) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im)) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.im (log.f64 x.re)))))) |
#s(approx (log (/ 1 x.re)) (*.f64 #s(literal -1 binary64) (log.f64 x.re))) |
#s(approx (/ 1 x.re) (/.f64 #s(literal 1 binary64) x.re)) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) (sin.f64 (*.f64 y.im (log.f64 x.re)))) |
#s(approx (* -1 (* y.im (log (/ 1 x.re)))) (*.f64 y.im (log.f64 x.re))) |
#s(approx (* y.im (log (/ 1 x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 x.re)))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* y.im (atan2 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (pow (atan2 x.im x.re) 2) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re))))) |
#s(approx (pow (log (/ 1 x.re)) 2) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (pow (atan2 x.im x.re) 3) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))))) |
#s(approx (pow (log (/ 1 x.re)) 3) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))))))))))))))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) |
#s(approx (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))) (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) |
#s(approx (* (log (/ -1 x.im)) (atan2 x.im x.re)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64)))))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (pow.f64 x.im #s(literal 2 binary64))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) |
#s(approx (* x.re x.re) (pow.f64 x.re #s(literal 2 binary64))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im)) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im)))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (log.f64 x.im)) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) x.im) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (+ (pow x.im 2) (pow x.re 2)) (pow.f64 x.im #s(literal 2 binary64))) |
#s(approx (+ (pow x.im 2) (pow x.re 2)) (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) |
#s(approx (pow x.re 2) (pow.f64 x.re #s(literal 2 binary64))) |
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))))))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (+.f64 (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.im)) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.im) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) |
#s(approx (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) |
#s(approx (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (log (/ 1 x.re)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (* -1 (* y.im (log (/ 1 x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (* y.im (log (/ 1 x.re))) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (pow (log (/ 1 x.re)) 2) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (pow (log (/ 1 x.re)) 3) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (pow.f64 x.re #s(literal 2 binary64))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)))) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im)))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) x.re) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (pow x.im 2) (pow x.re 2)) (pow.f64 x.re #s(literal 2 binary64))) |
#s(approx (+ (pow x.im 2) (pow x.re 2)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.re) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.re #s(literal 2 binary64))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (log (/ 1 x.re)) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) |
#s(approx (* -1 (* y.im (log (/ 1 x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) |
#s(approx (* y.im (log (/ 1 x.re))) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (atan2.f64 x.im x.re)))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)))) |
#s(approx (pow (log (/ 1 x.re)) 2) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64)))) |
#s(approx (pow (log (/ 1 x.re)) 3) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)))) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im)))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) x.re)) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.re)) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 x.re y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 x.re y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.re y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.re y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (pow.f64 x.re y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 x.re y.re)) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 x.re y.re))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re))) |
#s(approx x.im x.im) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re)) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))))))))))))))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (atan2.f64 x.im x.re)))))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* -1 (* y.re (log (/ -1 x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) |
#s(approx (* y.re (log (/ -1 x.im))) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) |
#s(approx (log (/ -1 x.im)) (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) |
#s(approx (/ -1 x.im) (/.f64 #s(literal -1 binary64) x.im)) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (atan2.f64 x.im x.re))))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 3 binary64)))) |
#s(approx (pow (log (/ -1 x.im)) 3) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 3 binary64))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (pow (log (/ -1 x.im)) 2) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64))) |
#s(approx (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (*.f64 y.im (*.f64 y.re (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (atan2.f64 x.im x.re))))) |
#s(approx (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))) (*.f64 y.re (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (atan2.f64 x.im x.re)))) |
#s(approx (* (log (/ -1 x.im)) (atan2 x.im x.re)) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (atan2.f64 x.im x.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64)))))))))) |
#s(approx (* x.im x.im) (pow.f64 x.im #s(literal 2 binary64))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im)) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im)))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im)) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (log.f64 x.re)) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (pow x.im 2) (pow.f64 x.im #s(literal 2 binary64))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))))))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (+.f64 (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.re)) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (atan2.f64 x.im x.re)))))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* -1 (* y.re (log (/ -1 x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (* y.re (log (/ -1 x.im))) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) |
#s(approx (log (/ -1 x.im)) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (atan2.f64 x.im x.re))))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) #s(literal 3 binary64)))) |
#s(approx (pow (log (/ -1 x.im)) 3) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) #s(literal 3 binary64))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (pow (log (/ -1 x.im)) 2) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) #s(literal 2 binary64))) |
#s(approx (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (*.f64 y.im (*.f64 y.re (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (atan2.f64 x.im x.re))))) |
#s(approx (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))) (*.f64 y.re (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (atan2.f64 x.im x.re)))) |
#s(approx (* (log (/ -1 x.im)) (atan2 x.im x.re)) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (atan2.f64 x.im x.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)))) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im)))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (+ (pow x.im 2) (pow x.re 2)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))) |
#s(approx (* -1 (* y.re (log (/ -1 x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) |
#s(approx (* y.re (log (/ -1 x.im))) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) |
#s(approx (log (/ -1 x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) |
#s(approx (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) |
#s(approx (pow (log (/ -1 x.im)) 3) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) |
#s(approx (pow (log (/ -1 x.im)) 2) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)))) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im)))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) x.im)) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) |
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.im)) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx y.re y.re) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 y.re (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (-.f64 (*.f64 y.re (-.f64 (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) |
#s(approx (pow y.re 3) (pow.f64 y.re #s(literal 3 binary64))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (fma.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (fma.f64 y.re (-.f64 (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))) |
#s(approx (pow y.re 2) (pow.f64 y.re #s(literal 2 binary64))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (*.f64 y.re (-.f64 (atan2.f64 x.im x.re) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (*.f64 y.re (-.f64 (fma.f64 y.re (-.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re)))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))) (atan2.f64 x.im x.re)))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (atan2.f64 x.im x.re)))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) y.im)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y.im))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y.im) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y.im) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) y.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.im))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y.im) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) y.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) y.im) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) y.im))))))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y.im)) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (+.f64 (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) y.im) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y.im))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.im) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) y.im)) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y.im))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) y.im) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) y.im))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) y.im)) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y.im))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/12 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/240 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))))))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/10080 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64)))) (*.f64 #s(literal 1/240 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal 1/120 binary64) (*.f64 y.im (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 y.im (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))))) (*.f64 #s(literal 1/120 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re) (atan2.f64 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.re) (atan2.f64 x.im x.re)))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.re)))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (*.f64 y.re (-.f64 (+.f64 (/.f64 (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.re) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (pow.f64 y.re #s(literal 3 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 y.re #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) y.re))))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 y.re #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)) |
#s(approx (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (atan2.f64 x.im x.re)))) |
#s(approx (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) (pow.f64 y.re #s(literal 2 binary64))))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 y.re #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) (pow.f64 y.re #s(literal 2 binary64)))))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) (pow.f64 y.re #s(literal 2 binary64))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) (pow.f64 y.re #s(literal 2 binary64))))))) |
#s(approx (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) |
#s(approx (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) y.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) y.re))) y.re) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re)))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) y.re)))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.re))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (atan2.f64 x.im x.re))))) (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))) y.re)) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (pow.f64 y.re #s(literal 3 binary64))))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) y.re)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.re)))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) y.re) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) |
#s(approx (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) y.re))) y.re) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)))))) |
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) y.re) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) |
#s(approx (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)))))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(literal 1 binary64)) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re))))) |
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) |
#s(approx y.im y.im) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (-.f64 (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 y.re (-.f64 (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 y.re (-.f64 (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 y.im (-.f64 (*.f64 y.re (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/120 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (*.f64 #s(literal 1/5040 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 8 binary64))))))))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/120 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (*.f64 #s(literal 1/5040 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 7 binary64))))))))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(literal 1 binary64)) |
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))))))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/5040 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 7 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 7 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/120 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 7 binary64))) (*.f64 #s(literal 1/5040 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 9 binary64))))))))))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (fma.f64 y.im (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (fma.f64 y.im (fma.f64 y.im (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))) |
#s(approx (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (fma.f64 y.im (fma.f64 y.im (fma.f64 y.im (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))))))))))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re))))))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))))))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 8 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64)))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/120 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 8 binary64))) (*.f64 #s(literal 1/5040 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 10 binary64))))))))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/5040 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 8 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) |
#s(approx (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (/.f64 (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (pow y.im 3) (pow.f64 y.im #s(literal 3 binary64))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (fma.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (fma.f64 y.im (-.f64 (*.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (pow y.im 2) (pow.f64 y.im #s(literal 2 binary64))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) y.im)) |
#s(approx (neg y.im) (*.f64 #s(literal -1 binary64) y.im)) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.im)) (atan2.f64 x.im x.re)))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 y.im #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 y.im #s(literal 3 binary64)))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) y.im) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 y.im #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) y.im))))) |
#s(approx (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 y.im #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im) (atan2.f64 x.im x.re)))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)))) |
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.im)))))) |
#s(approx (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)))))) |
#s(approx (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)))))) |
#s(approx (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 y.im #s(literal 3 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))) |
#s(approx (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.im)) (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) y.im) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) y.im)) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) y.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
Compiled 1 081 986 to 22 014 computations (98% saved)
16 alts after pruning (10 fresh and 6 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 2 739 | 4 | 2 743 |
| Fresh | 1 | 6 | 7 |
| Picked | 1 | 4 | 5 |
| Done | 0 | 2 | 2 |
| Total | 2 741 | 16 | 2 757 |
| Status | Accuracy | Program |
|---|---|---|
| 25.2% | (*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| 31.5% | (*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| ✓ | 56.8% | (*.f64 (/.f64 #s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| ▶ | 39.6% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
| ✓ | 20.6% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))))) |
| ▶ | 54.5% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
| ✓ | 34.5% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
| 36.8% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) | |
| ✓ | 34.3% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
| ✓ | 9.4% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
| ▶ | 7.4% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
| ✓ | 30.0% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
| 13.4% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) #s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) | |
| ▶ | 19.6% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
| 10.7% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))))) | |
| ▶ | 9.4% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
Compiled 9 250 to 2 261 computations (75.6% saved)
| Inputs |
|---|
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(*.f64 x.re x.re) |
x.re |
(*.f64 x.im x.im) |
x.im |
y.re |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(atan2.f64 x.im x.re) |
y.im |
(sin.f64 #s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (atan2.f64 x.im x.re))) |
(*.f64 y.re (atan2.f64 x.im x.re)) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))) |
(*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re))))) |
#s(literal -1 binary64) |
(*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))) |
(pow.f64 y.re #s(literal 3 binary64)) |
#s(literal 3 binary64) |
(+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re))) |
(*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
(+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
(*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(literal -1/6 binary64) |
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
(sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) |
(log.f64 (/.f64 #s(literal 1 binary64) x.re)) |
(/.f64 #s(literal 1 binary64) x.re) |
#s(literal 1 binary64) |
(*.f64 #s(literal 1/2 binary64) (PI.f64)) |
#s(literal 1/2 binary64) |
(PI.f64) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) |
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) |
(*.f64 y.im (atan2.f64 x.im x.re)) |
(+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
(*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
(pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) |
(sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
(*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) |
(pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) |
(*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) |
(*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)) |
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re) |
(+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
(*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) |
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(literal -1/2 binary64) |
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
(fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) |
(log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) |
(pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im) |
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(fma.f64 x.im x.im (*.f64 x.re x.re)) |
(fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) |
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))))))) |
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
(sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(/.f64 (PI.f64) #s(literal 2 binary64)) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
(fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))) |
#s(literal 1/6 binary64) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))))) |
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)) |
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)) |
(fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
(sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) |
(log.f64 (hypot.f64 x.re x.im)) |
(hypot.f64 x.re x.im) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
(-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) |
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) |
(*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) |
(neg.f64 y.im) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) |
(*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
(*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))) |
| Outputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (pow x.im 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))) (pow x.im 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))))))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2)))) |
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2))) |
#s(approx x.re #s(hole binary64 x.re)) |
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re)))) |
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (pow x.re 2) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (* (pow x.re 2) (+ (* -1 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.re 2) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.im) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.im) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.im) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) |
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (/ (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (sin (* y.im (log x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (sin (* y.im (log x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (sin (* y.im (log x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (* -1 (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.re))))) |
#s(approx (* y.im (log (/ 1 x.re))) #s(hole binary64 (* -1 (* y.im (log x.re))))) |
#s(approx (log (/ 1 x.re)) #s(hole binary64 (* -1 (log x.re)))) |
#s(approx (/ 1 x.re) #s(hole binary64 (/ 1 x.re))) |
#s(approx (pow (atan2 x.im x.re) 3) #s(hole binary64 (pow (atan2 x.im x.re) 3))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (exp (* y.im (atan2 x.im x.re))))) |
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re)))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* -1 (* (pow (log x.re) 3) (sin (* y.im (log x.re))))))) |
#s(approx (pow (log (/ 1 x.re)) 3) #s(hole binary64 (* -1 (pow (log x.re) 3)))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (sin (* y.im (log x.re))))) |
#s(approx (* -1 (* y.im (log (/ 1 x.re)))) #s(hole binary64 (* y.im (log x.re)))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (pow (atan2 x.im x.re) 2) #s(hole binary64 (pow (atan2 x.im x.re) 2))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))) |
#s(approx (pow (log (/ 1 x.re)) 2) #s(hole binary64 (pow (log x.re) 2))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (sin (* y.im (log x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (/ (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (sin (* y.im (log x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (sin (* y.im (log x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (/ (* (log x.re) (sin (* y.im (log x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1 (/ (* (log x.re) (sin (* y.im (log x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* -1 (* (log x.re) (sin (* y.im (log x.re))))))) |
#s(approx (* y.re (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.re (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (pow (log x.re) 2) (sin (* y.im (log x.re)))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log x.re) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (sin (* y.im (log x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (/ (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.re 2) (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (log (pow x.im y.im))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (log (pow x.im y.im))))) (pow x.im 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (+ (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (log (pow x.im y.im)))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/24 (* (pow x.re 2) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* 1/2 (/ y.im (pow x.im 2)))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* 1/720 (* (pow x.re 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow x.im y.im))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (pow x.im y.im))) (pow x.im 2))) (pow x.im y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im))))) (pow x.im y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))) (pow x.im y.im))))))) (pow x.im y.im)))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.im)) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2)))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (pow x.im 2))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (log (pow x.im y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (pow x.im 4))) (+ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (pow x.im 2))))) (* (pow (log x.im) 2) (sin (log (pow x.im y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (pow x.im 4))) (+ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (+ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (pow x.im 2)))))) (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (pow x.im 2))))) (* (pow (log x.im) 2) (sin (log (pow x.im y.im))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.im) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)) (pow (log x.im) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (+ (* 1/4 (/ 1 (pow x.im 4))) (* (pow x.re 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.im))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.im))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (/ (pow (atan2 x.im x.re) 3) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))) (* (pow (log x.im) 3) (sin (log (pow x.im y.im))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))))))))) (* (pow (log x.im) 3) (sin (log (pow x.im y.im))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (+ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))) (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))))))) (* (pow (log x.im) 3) (sin (log (pow x.im y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.im) 3))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (pow (log x.im) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow (log x.im) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (+ (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))))))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow (log x.im) 3)))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (/ (* (pow x.re 2) (* (log x.im) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (/ (* (log x.im) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow x.re 2) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (/ (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log x.im) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow (log x.im) 2) (atan2 x.im x.re)) (/ (* (pow x.re 2) (* (log x.im) (atan2 x.im x.re))) (pow x.im 2))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (/ (* (log x.im) (atan2 x.im x.re)) (pow x.im 2)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))))) (/ (* (log x.im) (atan2 x.im x.re)) (pow x.im 2)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (/ (* (log x.im) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (atan2 x.im x.re) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (atan2 x.im x.re) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (atan2 x.im x.re) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/6 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.im) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* (log x.im) (atan2 x.im x.re)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2))) (* (log x.im) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log x.im) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 4))) (* 1/2 (/ (atan2 x.im x.re) (pow x.im 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log x.im) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (atan2 x.im x.re) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (atan2 x.im x.re) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 6)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (/ (atan2 x.im x.re) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (log x.im) (sin (log (pow x.im y.im)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (pow x.im 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 4))) (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 4))) (+ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 6))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow x.im 2))) (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (log (pow x.im y.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/24 (/ (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6)))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6)))))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (pow x.re 2) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (pow x.re 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.re 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 6)))))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))))) (pow x.re 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (* (pow x.re 6) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))) |
#s(approx (* y.im (log (/ 1 x.re))) #s(hole binary64 (* y.im (log (/ 1 x.re))))) |
#s(approx (log (/ 1 x.re)) #s(hole binary64 (log (/ 1 x.re)))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) |
#s(approx (pow (log (/ 1 x.re)) 3) #s(hole binary64 (pow (log (/ 1 x.re)) 3))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.re))))))) |
#s(approx (* -1 (* y.im (log (/ 1 x.re)))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) |
#s(approx (pow (log (/ 1 x.re)) 2) #s(hole binary64 (pow (log (/ 1 x.re)) 2))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4)) (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 6))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.re))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.re))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.re)) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)) (+ (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4)) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ 1 x.re)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (pow (log (/ 1 x.re)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 6))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (pow (log (/ 1 x.re)) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)) (pow x.re 4))) (+ (* 1/720 (/ (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 6) (log (/ 1 x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)) (pow x.re 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)) (pow x.re 6)) (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)) (pow x.re 4))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow x.re 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 6)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))))) (pow x.re 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (* (pow x.re 6) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (* -1 (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI))))) |
#s(approx (* y.im (log (/ 1 x.re))) #s(hole binary64 (* y.im (+ (log -1) (log (/ -1 x.re)))))) |
#s(approx (log (/ 1 x.re)) #s(hole binary64 (+ (log -1) (log (/ -1 x.re))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)))) |
#s(approx (pow (log (/ 1 x.re)) 3) #s(hole binary64 (pow (+ (log -1) (log (/ -1 x.re))) 3))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))))) |
#s(approx (* -1 (* y.im (log (/ 1 x.re)))) #s(hole binary64 (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))))) |
#s(approx (pow (log (/ 1 x.re)) 2) #s(hole binary64 (pow (+ (log -1) (log (/ -1 x.re))) 2))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (/ (+ (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4)) (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 6))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.re))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.re))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.re))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)) (+ (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4)) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ -1 x.re)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (pow (log (/ -1 x.re)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.re))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 6))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (pow (log (/ -1 x.re)) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)) (pow x.re 4))) (+ (* 1/720 (/ (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 6) (log (/ -1 x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)) (pow x.re 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)) (pow x.re 6)) (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)) (pow x.re 4))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (pow x.re 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 6)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (pow x.re 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))) (pow x.re 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))))))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2))) |
#s(approx x.im #s(hole binary64 x.im)) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (pow x.im 2) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (* (pow x.im 2) (+ (* -1 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.im 2) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (/ (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (/ (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.im 2) (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (log (pow x.re y.im))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (log (pow x.re y.im))))) (pow x.re 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (+ (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (log (pow x.re y.im)))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/24 (* (pow x.im 2) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* 1/2 (/ y.im (pow x.re 2)))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* 1/720 (* (pow x.im 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow x.re y.im))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (pow x.re y.im))) (pow x.re 2))) (pow x.re y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im))))) (pow x.re y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))) (pow x.re y.im))))))) (pow x.re y.im)))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (pow x.re 2))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (log (pow x.re y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (pow x.re 4))) (+ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (pow x.re 2))))) (* (pow (log x.re) 2) (sin (log (pow x.re y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (pow x.re 4))) (+ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (+ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (pow x.re 2)))))) (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (pow x.re 2))))) (* (pow (log x.re) 2) (sin (log (pow x.re y.im))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.re) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (/ (* (pow x.im 2) (log x.re)) (pow x.re 2)) (pow (log x.re) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (+ (* 1/4 (/ 1 (pow x.re 4))) (* (pow x.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.re))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.re))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))) (* (pow (log x.re) 3) (sin (log (pow x.re y.im))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))))))))) (* (pow (log x.re) 3) (sin (log (pow x.re y.im))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (+ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))) (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))))))) (* (pow (log x.re) 3) (sin (log (pow x.re y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.re) 3))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (pow (log x.re) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow (log x.re) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (+ (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))))))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow (log x.re) 3)))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log x.re) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (/ (* (pow x.im 2) (* (log x.re) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log x.re) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (/ (* (log x.re) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow x.im 2) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log x.re) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (/ (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.re) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log x.re) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow (log x.re) 2) (atan2 x.im x.re)) (/ (* (pow x.im 2) (* (log x.re) (atan2 x.im x.re))) (pow x.re 2))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (/ (* (log x.re) (atan2 x.im x.re)) (pow x.re 2)))) (* (pow (log x.re) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))))) (/ (* (log x.re) (atan2 x.im x.re)) (pow x.re 2)))) (* (pow (log x.re) 2) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (/ (* (log x.re) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (atan2 x.im x.re) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (atan2 x.im x.re) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (atan2 x.im x.re) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/6 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.re) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* (log x.re) (atan2 x.im x.re)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2))) (* (log x.re) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log x.re) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 4))) (* 1/2 (/ (atan2 x.im x.re) (pow x.re 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log x.re) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (atan2 x.im x.re) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (atan2 x.im x.re) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 6)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (log x.re) (sin (log (pow x.re y.im)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (pow x.re 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 4))) (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 4))) (+ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 6))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow x.re 2))) (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (log (pow x.re y.im))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/24 (/ (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6)))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6)))))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (pow x.im 2) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (pow x.im 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.im 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 6)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))))) (pow x.im 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (* (pow x.im 6) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4)) (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 6))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.im))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.im))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)) (+ (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4)) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ 1 x.im)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (pow (log (/ 1 x.im)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 6))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (pow (log (/ 1 x.im)) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)) (pow x.im 4))) (+ (* 1/720 (/ (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 6) (log (/ 1 x.im))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)) (pow x.im 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)) (pow x.im 6)) (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)) (pow x.im 4))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (pow x.im 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 6)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))))) (pow x.im 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (* (pow x.im 6) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4)) (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 6))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.im))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.im))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.im))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)) (+ (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4)) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ -1 x.im)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (pow (log (/ -1 x.im)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 6))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (pow (log (/ -1 x.im)) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)) (pow x.im 4))) (+ (* 1/720 (/ (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 6) (log (/ -1 x.im))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)) (pow x.im 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)) (pow x.im 6)) (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)) (pow x.im 4))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (pow x.im 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 6)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (+ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* -1/6 (pow (atan2 x.im x.re) 3)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx y.re #s(hole binary64 y.re)) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* -1/6 (pow (atan2 x.im x.re) 3)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (- (* -1 (* y.re (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (- (* y.re (- (* -1 (/ (* y.re (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1 (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* y.re (+ (* -1 (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* y.re (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1 (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (pow y.re 3) #s(hole binary64 (pow y.re 3))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (pow y.re 2))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (/ (+ (* -1 (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (pow y.re 2)))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (/ (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1 (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow y.re 2)))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (pow y.re 2))))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (/ (+ (* -1 (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (pow y.re 2)))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (pow y.re 2)))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (pow y.re 2)))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) y.re))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) y.re))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (/ (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) y.re))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (/ (+ (* y.re (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) y.re))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* y.re (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) y.re))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (* y.re (- (atan2 x.im x.re) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (* y.re (- (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (atan2 x.im x.re)) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (* y.re (- (+ (* y.re (- (* y.re (- (* -1/6 (pow (atan2 x.im x.re) 3)) (* -1 (* y.im (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))))))) (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (atan2 x.im x.re)) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* y.re (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* 1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* y.re (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1 (* y.im (* y.re (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))) (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* y.re (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* (pow y.im 3) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.re (- (+ (* -1 (/ (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))) (pow y.re 2))) (atan2 x.im x.re)) (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.re (- (+ (* -1 (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))))) (* (pow y.re 3) (atan2 x.im x.re)))) (atan2 x.im x.re)) (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (atan2 x.im x.re)))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* (pow y.re 3) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (pow y.re 3) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) y.re)))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (pow y.re 2))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) y.re))))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) y.re))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (pow y.re 2))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) y.re)))))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) y.re)))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (/ (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) y.re))) y.re))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) y.re))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (- (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* y.re (atan2 x.im x.re)))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re)))) (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re)))) y.re)) (* -1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (* -1 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* y.re (exp (* y.im (atan2 x.im x.re))))))) y.re)) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (* -1 (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* y.re (exp (* y.im (atan2 x.im x.re))))))) y.re)) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) y.re))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) y.re))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) y.re)) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) y.re))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))))) y.re)) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) y.re)) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) y.re))))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) y.re)) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) y.re)))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (* -1 (/ (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))))) y.re)))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) y.re)) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) y.re))) y.re)) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (* -1 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) y.re)) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* -1 (/ (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) y.re))) y.re)) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) y.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (* -1/2 (/ (PI) y.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re)))) (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx y.im #s(hole binary64 y.im)) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* y.im (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re)))) (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* y.re (atan2 x.im x.re)))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (+ (* y.im (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.re (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (+ (* y.re (- (+ (* -1/2 (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ 1 x.re))) (* y.re (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ 1 x.re))) (+ (* y.im (- (* y.re (- (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))) (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* y.re (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ 1 x.re))) (+ (* y.im (- (+ (* y.im (- (+ (* 1/6 (pow (log (/ 1 x.re)) 3)) (* y.re (- (+ (* -1 (- (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))))) (+ (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* y.re (- (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* y.re (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))))))) (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re)))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (+ (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re))))) (* y.im (+ (* -1 (* y.im (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))) (* -1 (- (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (pow y.re 2))) (+ (* -1 (/ (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) y.re)) (+ (* -1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)) y.re)))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (pow y.re 2))) (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)) y.re)))))))) (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))))))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (+ (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re))))) (* y.im (+ (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2))))))) (* y.im (+ (* -1 (* y.im (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))) (* -1 (- (+ (* -1 (/ (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))) y.re)) (+ (* -1 (/ (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re))) y.re)) (+ (* -1/2 (/ (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4)))) y.re)) (+ (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))) y.re)))))) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)) (pow y.re 2))) (+ (* 1/2 (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)) y.re))))))))) (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))) (* -1 (- (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (pow y.re 2))) (+ (* -1 (/ (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) y.re)) (+ (* -1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)) y.re)))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (pow y.re 2))) (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)) y.re)))))))))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re)))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (+ (* y.im (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2))))))) (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* y.im (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))) (* -1 (- (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (pow y.re 2))) (+ (* -1 (/ (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) y.re)) (+ (* -1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)) y.re)))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (pow y.re 2))) (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)) y.re))))))) (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))))))) (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* y.im (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))) (* -1 (- (+ (* -1 (/ (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))) y.re)) (+ (* -1 (/ (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re))) y.re)) (+ (* -1/2 (/ (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4)))) y.re)) (+ (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))) y.re)))))) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)) (pow y.re 2))) (+ (* 1/2 (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)) y.re)))))))) (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))) (* -1 (- (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (pow y.re 2))) (+ (* -1 (/ (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) y.re)) (+ (* -1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)) y.re)))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (pow y.re 2))) (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)) y.re)))))))) (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))))))) (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re))))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (+ (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re)) (* y.im (+ (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))))))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (+ (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re)) (* y.im (+ (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (+ (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))) (* y.im (+ (* -1 (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))) (* -1 (- (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (pow y.re 2))) (+ (* -1 (/ (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) y.re)) (+ (* -1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)) y.re)))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (pow y.re 2))) (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)) y.re))))))))))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (+ (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re)) (* y.im (+ (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (+ (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))) (* y.im (+ (* -1 (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))) (+ (* -1 (- (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (pow y.re 2))) (+ (* -1 (/ (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) y.re)) (+ (* -1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)) y.re)))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (pow y.re 2))) (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)) y.re)))) (* y.im (+ (* -1 (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))) (* -1 (- (+ (* -1 (/ (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))) y.re)) (+ (* -1 (/ (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re))) y.re)) (+ (* -1/2 (/ (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4)))) y.re)) (+ (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))) y.re)))))) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)) (pow y.re 2))) (+ (* 1/2 (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)) y.re))))))))))))))))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* y.im (+ (* -1 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))) (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* y.im (+ (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* y.im (+ (* -1 (* y.im (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4)))))))))) (* -1 (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))))))))))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/6 (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))))) (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))))) (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* y.im (+ (* -1/6 (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))))))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3))))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1 (* y.im (* (cos (* 1/2 (PI))) (log (/ 1 x.re)))))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* 1/2 (PI))))))))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* 1/2 (PI))))) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (pow (log (/ 1 x.re)) 3))))))))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (* 1/2 (PI)))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 1)) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))))))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/6 (* y.im (pow (log (/ 1 x.re)) 4))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (* -1/6 (* y.im (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (* 1/6 (pow (log (/ 1 x.re)) 4)))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* y.im (+ (* -1/6 (* y.im (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2)))))) (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (* 1/6 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 3))) (* (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 4))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* y.im (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* y.im (- (* y.im (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 3))) (* (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/6 (pow (log (/ 1 x.re)) 6))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 4))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* 1/6 (* (pow y.im 2) (pow (log (/ 1 x.re)) 6))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (pow (log (/ 1 x.re)) 8))) (* 1/6 (pow (log (/ 1 x.re)) 6)))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* (pow y.im 2) (+ (* 1/6 (pow (log (/ 1 x.re)) 6)) (* (pow y.im 2) (+ (* -1/120 (pow (log (/ 1 x.re)) 8)) (* 1/5040 (* (pow y.im 2) (pow (log (/ 1 x.re)) 10))))))))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/6 (* (pow y.im 2) (pow (log (/ 1 x.re)) 3))))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (pow (log (/ 1 x.re)) 5))) (* 1/6 (pow (log (/ 1 x.re)) 3)))))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* (pow y.im 2) (+ (* 1/6 (pow (log (/ 1 x.re)) 3)) (* (pow y.im 2) (+ (* -1/120 (pow (log (/ 1 x.re)) 5)) (* 1/5040 (* (pow y.im 2) (pow (log (/ 1 x.re)) 7))))))))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4)))))))))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* y.im (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* y.im (- (* y.im (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))) (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 5))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 5))) (* (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4)))) (atan2 x.im x.re)))))) (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))) (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* y.im (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* 1/6 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2)))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 6) (pow (atan2 x.im x.re) 2)))) (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/120 (* (pow (log (/ 1 x.re)) 6) (pow (atan2 x.im x.re) 2))) (* 1/5040 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 8) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* 1/6 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 5) (pow (atan2 x.im x.re) 2)))) (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/120 (* (pow (log (/ 1 x.re)) 5) (pow (atan2 x.im x.re) 2))) (* 1/5040 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 7) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/2 (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/2 (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re))))))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re)))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (+ (* -1 (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2))))) (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re))))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re)) (* y.im (+ (* -1 (* y.im (- (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (pow y.re 2))) (+ (* -1 (/ (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) y.re)) (+ (* -1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)) y.re)))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (pow y.re 2))) (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)) y.re))))) (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2))))))))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re)) (* y.im (+ (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))) (* y.im (+ (* -1 (* y.im (- (+ (* -1 (/ (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))) y.re)) (+ (* -1 (/ (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re))) y.re)) (+ (* -1/2 (/ (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4)))) y.re)) (+ (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))) y.re)))))) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)) (pow y.re 2))) (+ (* 1/2 (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)) y.re)))))) (* -1 (- (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (pow y.re 2))) (+ (* -1 (/ (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) y.re)) (+ (* -1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)) y.re)))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (pow y.re 2))) (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)) y.re))))))))))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) (pow y.re 2)))))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (+ (* y.im (- (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (pow y.re 2))) (+ (* -1 (/ (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) y.re)) (+ (* -1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)) y.re)))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (pow y.re 2))) (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)) y.re)))) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2))))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) (pow y.re 2)))))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (+ (* y.im (- (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (pow y.re 2))) (+ (* -1 (/ (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) y.re)) (+ (* -1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (pow y.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)) y.re)) (* y.im (- (+ (* -1 (/ (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))) y.re)) (+ (* -1 (/ (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re))) y.re)) (+ (* -1/2 (/ (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4)))) y.re)) (+ (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))) y.re)))))) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)) (pow y.re 2))) (+ (* 1/2 (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)) y.re)))))))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (pow y.re 2))) (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)) y.re)))) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2))))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) (pow y.re 2)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (/ (pow (log (/ 1 x.re)) 2) y.re))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (+ (* y.im (- (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re))))) (/ (pow (log (/ 1 x.re)) 2) y.re)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (+ (* y.im (- (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.im (- (+ (* -1 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1 (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)))) (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) y.re)) (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))))))) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)) y.re)) (+ (* 1/2 (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re))))) (/ (pow (log (/ 1 x.re)) 2) y.re)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re))))) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (/ (* y.im (pow (log (/ 1 x.re)) 2)) y.re))) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (/ (* y.im (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))) y.re)) (/ (pow (log (/ 1 x.re)) 2) y.re))))) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* y.im (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re))))) (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) y.re)))) (/ (pow (log (/ 1 x.re)) 2) y.re))))) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) y.re)) (* y.im (+ (* -1 (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)))) (* y.im (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re))) (atan2 x.im x.re))))))))) (/ (pow (log (/ 1 x.re)) 2) y.re))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1 (/ (* y.im (pow (log (/ 1 x.re)) 2)) y.re)))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (* -1 (/ (pow (log (/ 1 x.re)) 2) y.re)) (/ (* y.im (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))) y.re))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (* -1 (/ (pow (log (/ 1 x.re)) 2) y.re)) (* y.im (- (* y.im (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)))) (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) y.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (* -1 (/ (pow (log (/ 1 x.re)) 2) y.re)) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re))) (atan2 x.im x.re)))))) (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)))) (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) y.re)))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 2))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* 1/6 (* (pow y.im 2) (pow (log (/ 1 x.re)) 4))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (pow (log (/ 1 x.re)) 6))) (* 1/6 (pow (log (/ 1 x.re)) 4)))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* (pow y.im 2) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* (pow y.im 2) (+ (* -1/120 (pow (log (/ 1 x.re)) 6)) (* 1/5040 (* (pow y.im 2) (pow (log (/ 1 x.re)) 8))))))))))) |
#s(approx (* y.re (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 y.re)) |
#s(approx (* y.re (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ y.re (* y.im (* y.re (atan2 x.im x.re)))))) |
#s(approx (* y.re (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ y.re (* y.im (+ (* 1/2 (* y.im (* y.re (pow (atan2 x.im x.re) 2)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.re (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ y.re (* y.im (+ (* y.im (+ (* 1/6 (* y.im (* y.re (pow (atan2 x.im x.re) 3)))) (* 1/2 (* y.re (pow (atan2 x.im x.re) 2))))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.im (- (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re))))))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.im (- (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.im (- (+ (* -1 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) y.re)) (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))))))) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)) y.re)) (+ (* 1/2 (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re))))))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))))))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.im (- (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.im (- (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.im (- (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) y.re)) (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))))) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)) y.re)) (+ (* 1/2 (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.im (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.im (- (* y.im (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 5))) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 5))) (* (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4)))) (atan2 x.im x.re)))))) (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (* -1/2 (pow (log (/ 1 x.re)) 3))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (* y.im (- (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re))))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (* y.im (- (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.im (- (+ (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) y.re)) (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))))) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)) y.re)) (+ (* 1/2 (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re))))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 3))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* y.im (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* y.im (- (* y.im (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3))) (* (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/6 (pow (log (/ 1 x.re)) 5))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 3))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* 1/6 (* (pow y.im 2) (pow (log (/ 1 x.re)) 5))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (pow (log (/ 1 x.re)) 7))) (* 1/6 (pow (log (/ 1 x.re)) 5)))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* (pow y.im 2) (+ (* 1/6 (pow (log (/ 1 x.re)) 5)) (* (pow y.im 2) (+ (* -1/120 (pow (log (/ 1 x.re)) 7)) (* 1/5040 (* (pow y.im 2) (pow (log (/ 1 x.re)) 9))))))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (* y.im (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (* y.im (- (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (* y.im (- (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) y.re)) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)) y.re)) (+ (* 1/2 (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (- (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))))) (+ (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 2))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* y.im (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* y.im (- (* y.im (- (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* (- (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/6 (pow (log (/ 1 x.re)) 4))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))) (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4)))))))))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))) (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* y.im (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* y.im (- (* y.im (- (* 1/6 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (* (- (* 1/6 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/6 (pow (log (/ 1 x.re)) 3))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.im (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (+ (* y.im (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (+ (* y.re (- (+ (* -1/2 (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1/2 (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* y.im (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* y.im (- (+ (* y.im (- (* (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))) (+ (* 1/2 (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (pow (atan2 x.im x.re) 2))) (* (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 1)) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (- (* -1 (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re)))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))) (+ (* -1/2 (pow (atan2 x.im x.re) 3)) (* 1/6 (pow (atan2 x.im x.re) 3)))))) (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* y.im (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* y.im (* (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (atan2 x.im x.re) 2))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.im (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* 1/24 (* y.im (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 1)) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (+ (* y.im (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (* (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* y.im (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* y.im (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* y.im (- (+ (* y.im (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))) (+ (* 1/2 (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (pow (atan2 x.im x.re) 2))) (* (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.im (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* y.im (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (pow (atan2 x.im x.re) 3))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1 (* y.im (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (pow (atan2 x.im x.re) 5)) (* 1/2 (pow (atan2 x.im x.re) 5))))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (pow (atan2 x.im x.re) 5)) (* 1/2 (pow (atan2 x.im x.re) 5))) (atan2 x.im x.re))) (+ (* -1/2 (pow (atan2 x.im x.re) 6)) (* 1/6 (pow (atan2 x.im x.re) 6)))))) (+ (* -1 (pow (atan2 x.im x.re) 5)) (* 1/2 (pow (atan2 x.im x.re) 5))))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (+ (* y.im (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (* (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* y.im (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/2 (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/2 (* y.im (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))))) (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (atan2 x.im x.re))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))))))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* y.im (- (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (atan2 x.im x.re))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (pow (atan2 x.im x.re) 3)) (* 1/2 (pow (atan2 x.im x.re) 3))))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (pow (atan2 x.im x.re) 3)) (* 1/2 (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))) (+ (* -1/2 (pow (atan2 x.im x.re) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))) (+ (* -1 (pow (atan2 x.im x.re) 3)) (* 1/2 (pow (atan2 x.im x.re) 3))))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (+ (* y.im (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (* (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.im (- (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (* (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (neg y.im) #s(hole binary64 (* -1 y.im))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.im (- (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow y.im 2)))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.im (- (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.re (* (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (pow y.im 3) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (+ (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)) (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* (pow y.im 2) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* (pow y.im 2) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (PI) y.im)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (/ (PI) y.im)))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* (pow y.im 2) (- (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* (pow y.im 2) (- (/ (sin (* y.re (atan2 x.im x.re))) (pow y.im 2)) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* 1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (- (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* -1 (* y.re (atan2 x.im x.re)))) y.im))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* y.re (* (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) y.im)) (* -1 (* y.re (atan2 x.im x.re)))) y.im))))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (* -1 (* y.im (+ (log (/ 1 x.re)) (* -1/2 (/ (PI) y.im))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1/2 (/ (PI) y.im))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* (pow y.im 2) (- (* -1 (/ (- (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im)) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
12 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 103.0ms | y.im | @ | 0 | ((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) (pow y.re 3) 3 (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (* y.im (log (/ 1 x.re))) (log (/ 1 x.re)) (/ 1 x.re) 1 (* 1/2 (PI)) 1/2 (PI) (pow (atan2 x.im x.re) 3) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))) (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (pow (atan2 x.im x.re) 2) 2 (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (/ (PI) 2) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) |
| 78.0ms | x.re | @ | -inf | ((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) (pow y.re 3) 3 (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (* y.im (log (/ 1 x.re))) (log (/ 1 x.re)) (/ 1 x.re) 1 (* 1/2 (PI)) 1/2 (PI) (pow (atan2 x.im x.re) 3) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))) (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (pow (atan2 x.im x.re) 2) 2 (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (/ (PI) 2) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) |
| 70.0ms | x.re | @ | inf | ((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) (pow y.re 3) 3 (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (* y.im (log (/ 1 x.re))) (log (/ 1 x.re)) (/ 1 x.re) 1 (* 1/2 (PI)) 1/2 (PI) (pow (atan2 x.im x.re) 3) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))) (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (pow (atan2 x.im x.re) 2) 2 (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (/ (PI) 2) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) |
| 68.0ms | x.re | @ | 0 | ((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) (pow y.re 3) 3 (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (* y.im (log (/ 1 x.re))) (log (/ 1 x.re)) (/ 1 x.re) 1 (* 1/2 (PI)) 1/2 (PI) (pow (atan2 x.im x.re) 3) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))) (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (pow (atan2 x.im x.re) 2) 2 (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (/ (PI) 2) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) |
| 68.0ms | y.im | @ | -inf | ((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) (pow y.re 3) 3 (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (* y.im (log (/ 1 x.re))) (log (/ 1 x.re)) (/ 1 x.re) 1 (* 1/2 (PI)) 1/2 (PI) (pow (atan2 x.im x.re) 3) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))) (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (pow (atan2 x.im x.re) 2) 2 (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (/ (PI) 2) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 14738 | 652201 |
| 0 | 15118 | 652201 |
| 0 | 15118 | 629027 |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| Inputs |
|---|
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) |
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) |
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(*.f64 x.re x.re) |
x.re |
(*.f64 x.im x.im) |
x.im |
y.re |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(atan2.f64 x.im x.re) |
y.im |
(sin.f64 #s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (atan2.f64 x.im x.re))) |
(*.f64 y.re (atan2.f64 x.im x.re)) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))) |
(*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re))))) |
#s(literal -1 binary64) |
(*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))) |
(pow.f64 y.re #s(literal 3 binary64)) |
#s(literal 3 binary64) |
(+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re))) |
(*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
(+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
(*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(literal -1/6 binary64) |
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
(sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) |
(log.f64 (/.f64 #s(literal 1 binary64) x.re)) |
(/.f64 #s(literal 1 binary64) x.re) |
#s(literal 1 binary64) |
(*.f64 #s(literal 1/2 binary64) (PI.f64)) |
#s(literal 1/2 binary64) |
(PI.f64) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) |
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) |
(*.f64 y.im (atan2.f64 x.im x.re)) |
(+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
(*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
(pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) |
(sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
(*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) |
(pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) |
(*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) |
(*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)) |
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re) |
(+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
(*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) |
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(literal -1/2 binary64) |
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
(fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) |
(log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) |
(pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im) |
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(fma.f64 x.im x.im (*.f64 x.re x.re)) |
(fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) |
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))))))) |
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
(sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(/.f64 (PI.f64) #s(literal 2 binary64)) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
(fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))) |
#s(literal 1/6 binary64) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))))) |
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)) |
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)) |
(fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
(sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) |
(log.f64 (hypot.f64 x.re x.im)) |
(hypot.f64 x.re x.im) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
(-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) |
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) |
(*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) |
(neg.f64 y.im) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) |
(*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
(*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (pow x.im 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))) (pow x.im 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))))))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2)))) |
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2))) |
#s(approx x.re #s(hole binary64 x.re)) |
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re)))) |
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (pow x.re 2) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (* (pow x.re 2) (+ (* -1 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (* (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.re 2) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.im) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.im) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))))) (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))))) (/ (* (+ (* (pow y.im 3) (pow (log x.im) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.im 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.im) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.im) (atan2 x.im x.re)))))))))) |
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (/ (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (sin (* y.im (log x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (sin (* y.im (log x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (sin (* y.im (log x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (* -1 (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.re))))) |
#s(approx (* y.im (log (/ 1 x.re))) #s(hole binary64 (* -1 (* y.im (log x.re))))) |
#s(approx (log (/ 1 x.re)) #s(hole binary64 (* -1 (log x.re)))) |
#s(approx (/ 1 x.re) #s(hole binary64 (/ 1 x.re))) |
#s(approx (pow (atan2 x.im x.re) 3) #s(hole binary64 (pow (atan2 x.im x.re) 3))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (exp (* y.im (atan2 x.im x.re))))) |
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re)))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* -1 (* (pow (log x.re) 3) (sin (* y.im (log x.re))))))) |
#s(approx (pow (log (/ 1 x.re)) 3) #s(hole binary64 (* -1 (pow (log x.re) 3)))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (sin (* y.im (log x.re))))) |
#s(approx (* -1 (* y.im (log (/ 1 x.re)))) #s(hole binary64 (* y.im (log x.re)))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (pow (atan2 x.im x.re) 2) #s(hole binary64 (pow (atan2 x.im x.re) 2))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))) |
#s(approx (pow (log (/ 1 x.re)) 2) #s(hole binary64 (pow (log x.re) 2))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (sin (* y.im (log x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (/ (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (sin (* y.im (log x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (sin (* y.im (log x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (/ (* (log x.re) (sin (* y.im (log x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1 (/ (* (log x.re) (sin (* y.im (log x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* -1 (* (log x.re) (sin (* y.im (log x.re))))))) |
#s(approx (* y.re (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.re (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (pow (log x.re) 2) (sin (* y.im (log x.re)))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log x.re) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (* y.im (log x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (sin (* y.im (log x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (/ (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.re 2) (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (log (pow x.im y.im))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (log (pow x.im y.im))))) (pow x.im 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (+ (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (log (pow x.im y.im)))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/24 (* (pow x.re 2) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* 1/2 (/ y.im (pow x.im 2)))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* 1/720 (* (pow x.re 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow x.im y.im))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (pow x.im y.im))) (pow x.im 2))) (pow x.im y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im))))) (pow x.im y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))) (pow x.im y.im))))))) (pow x.im y.im)))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.im)) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2)))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log x.im) 2) (sin (log (pow x.im y.im)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (pow x.im 2))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (log (pow x.im y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (pow x.im 4))) (+ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (pow x.im 2))))) (* (pow (log x.im) 2) (sin (log (pow x.im y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 2))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (pow x.im 4))) (+ (* (sin (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (+ (* (pow (log x.im) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (pow x.im 2)))))) (* (pow (log x.im) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (pow x.im 2))))) (* (pow (log x.im) 2) (sin (log (pow x.im y.im))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.im) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)) (pow (log x.im) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (+ (* 1/4 (/ 1 (pow x.im 4))) (* (pow x.re 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.im))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.im) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (* (log x.im) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* 1/2 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* (log x.im) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* 1/6 (/ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.im))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (/ (pow (atan2 x.im x.re) 3) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log x.im) 3) (sin (log (pow x.im y.im)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))) (* (pow (log x.im) 3) (sin (log (pow x.im y.im))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))))))))) (* (pow (log x.im) 3) (sin (log (pow x.im y.im))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (log x.im) 3))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (pow x.im 2))) (+ (* (sin (log (pow x.im y.im))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (+ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (* (pow (log x.im) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))) (* (pow (log x.im) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))))))) (* (pow (log x.im) 3) (sin (log (pow x.im y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.im) 3))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (pow (log x.im) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow (log x.im) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (+ (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))))))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow (log x.im) 3)))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.im) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.im) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (/ (* (pow x.re 2) (* (log x.im) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (/ (* (log x.im) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow x.re 2) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (/ (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log x.im) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow (log x.im) 2) (atan2 x.im x.re)) (/ (* (pow x.re 2) (* (log x.im) (atan2 x.im x.re))) (pow x.im 2))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re))) (/ (* (log x.im) (atan2 x.im x.re)) (pow x.im 2)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (atan2 x.im x.re))))) (/ (* (log x.im) (atan2 x.im x.re)) (pow x.im 2)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (log x.im) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (/ (* (log x.im) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (atan2 x.im x.re) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (atan2 x.im x.re) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (atan2 x.im x.re) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/6 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.im) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* (log x.im) (atan2 x.im x.re)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2))) (* (log x.im) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log x.im) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 4))) (* 1/2 (/ (atan2 x.im x.re) (pow x.im 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log x.im) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (atan2 x.im x.re) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (atan2 x.im x.re) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 6)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (/ (atan2 x.im x.re) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.im) (sin (log (pow x.im y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (log x.im) (sin (log (pow x.im y.im)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (pow x.im 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 4))) (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.im) (sin (log (pow x.im y.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (log (pow x.im y.im))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (log x.im))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (log (pow x.im y.im))) (pow x.im 4))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 4))) (+ (* (log x.im) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 6))) (+ (* 1/6 (/ (sin (log (pow x.im y.im))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow x.im 2))) (* (log x.im) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (log (pow x.im y.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/24 (/ (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (sin (log (pow x.im y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6)))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6)))))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (pow x.re 2) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (pow x.re 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.re 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (/ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 6)))))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))))) (pow x.re 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (* (pow x.re 6) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))) |
#s(approx (* y.im (log (/ 1 x.re))) #s(hole binary64 (* y.im (log (/ 1 x.re))))) |
#s(approx (log (/ 1 x.re)) #s(hole binary64 (log (/ 1 x.re)))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) |
#s(approx (pow (log (/ 1 x.re)) 3) #s(hole binary64 (pow (log (/ 1 x.re)) 3))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.re))))))) |
#s(approx (* -1 (* y.im (log (/ 1 x.re)))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) |
#s(approx (pow (log (/ 1 x.re)) 2) #s(hole binary64 (pow (log (/ 1 x.re)) 2))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4)) (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 6))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.re))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.re))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.re)) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)) (+ (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4)) (/ (* (pow (log (/ 1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ 1 x.re)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (pow (log (/ 1 x.re)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.re))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 6))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (pow (log (/ 1 x.re)) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)) (pow x.re 4))) (+ (* 1/720 (/ (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 6) (log (/ 1 x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)) (pow x.re 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)) (pow x.re 6)) (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)) (pow x.re 4))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow x.re 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 6)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))))) (pow x.re 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))) (pow x.re 4))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (* -1 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (pow x.re 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (pow x.re 2))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.re)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))))))) (* (pow x.re 6) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.re 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* -1/4 (* (pow x.im 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.re)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re))))) (* 1/2 (* (pow x.im 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) 2)))) (* (pow x.re 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.re 2)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (* -1 (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI))))) |
#s(approx (* y.im (log (/ 1 x.re))) #s(hole binary64 (* y.im (+ (log -1) (log (/ -1 x.re)))))) |
#s(approx (log (/ 1 x.re)) #s(hole binary64 (+ (log -1) (log (/ -1 x.re))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)))) |
#s(approx (pow (log (/ 1 x.re)) 3) #s(hole binary64 (pow (+ (log -1) (log (/ -1 x.re))) 3))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))))) |
#s(approx (* -1 (* y.im (log (/ 1 x.re)))) #s(hole binary64 (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))))) |
#s(approx (pow (log (/ 1 x.re)) 2) #s(hole binary64 (pow (+ (log -1) (log (/ -1 x.re))) 2))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (/ (+ (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (* y.re (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (+ (log -1) (log (/ -1 x.re)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (+ (log -1) (log (/ -1 x.re))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (pow (+ (log -1) (log (/ -1 x.re))) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (* (+ (log -1) (log (/ -1 x.re))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (* (pow (+ (log -1) (log (/ -1 x.re))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (+ (log -1) (log (/ -1 x.re))))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (sin (* -1 (* y.im (+ (log -1) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.re 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4)) (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 6))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.re))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.re))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.re))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)) (+ (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4)) (/ (* (pow (log (/ -1 x.re)) 2) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ -1 x.re)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (pow (log (/ -1 x.re)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.re))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.re 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.re 2))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.re)) 3) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1 (/ (* (pow (log (/ -1 x.re)) 3) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 6))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (pow (log (/ -1 x.re)) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)) (pow x.re 4))) (+ (* 1/720 (/ (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 6) (log (/ -1 x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.re 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.re 4)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.re)) 2) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)) (pow x.re 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (atan2 x.im x.re))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)) (pow x.re 6)) (/ (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)) (pow x.re 4))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.im 4) (atan2 x.im x.re)) (pow x.re 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (pow x.re 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (pow x.re 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 4))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (pow x.re 6)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (pow x.re 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))) (pow x.re 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))))))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2))) |
#s(approx x.im #s(hole binary64 x.im)) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (pow x.im 2) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 2))) (+ (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (* (pow x.im 2) (+ (* -1 (* (sin (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (* (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))))) (* (cos (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.im 2) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (* 1/6 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 6))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (+ (/ (* (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) (/ (* (pow y.im 3) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (+ (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* -1/4 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 4))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)) (/ (* (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))))) (/ (* (pow y.im 3) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))))) (/ (* (+ (* (pow y.im 3) (pow (log x.re) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)) (* 1/2 (/ (* y.im (* y.re (atan2 x.im x.re))) (pow x.re 2))))) (pow (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re))))) 2)))) (+ (/ (* (pow y.im 3) (pow (log x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log x.re) (atan2 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (/ (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (/ (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.im 2) (+ (* -1/2 (/ (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (log (pow x.re y.im))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (log (pow x.re y.im))))) (pow x.re 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (+ (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (log (pow x.re y.im)))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/24 (* (pow x.im 2) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* 1/2 (/ y.im (pow x.re 2)))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* 1/720 (* (pow x.im 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow x.re y.im))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (pow x.re y.im))) (pow x.re 2))) (pow x.re y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im))))) (pow x.re y.im)))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))) (pow x.re y.im))))))) (pow x.re y.im)))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log x.re) 2) (sin (log (pow x.re y.im)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (pow x.re 2))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (log (pow x.re y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (pow x.re 4))) (+ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (pow x.re 2))))) (* (pow (log x.re) 2) (sin (log (pow x.re y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 2))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (pow x.re 4))) (+ (* (sin (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (+ (* (pow (log x.re) 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (pow x.re 2)))))) (* (pow (log x.re) 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (pow x.re 2))))) (* (pow (log x.re) 2) (sin (log (pow x.re y.im))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.re) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (/ (* (pow x.im 2) (log x.re)) (pow x.re 2)) (pow (log x.re) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (+ (* 1/4 (/ 1 (pow x.re 4))) (* (pow x.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.re))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (log x.re) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (* (log x.re) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* 1/2 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* (log x.re) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* 1/6 (/ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/6 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* -1/6 (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.re))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* 1/6 (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log x.re) 3) (sin (log (pow x.re y.im)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))) (* (pow (log x.re) 3) (sin (log (pow x.re y.im))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))))))))) (* (pow (log x.re) 3) (sin (log (pow x.re y.im))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (log x.re) 3))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (pow x.re 2))) (+ (* (sin (log (pow x.re y.im))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (+ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (* (pow (log x.re) 3) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))) (* (pow (log x.re) 3) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))))))) (* (pow (log x.re) 3) (sin (log (pow x.re y.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.re) 3))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (pow (log x.re) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow (log x.re) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (+ (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))))))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow (log x.re) 3)))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow (log x.re) 2) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log x.re) 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (pow (log x.re) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log x.re) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (/ (* (pow x.im 2) (* (log x.re) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log x.re) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (/ (* (log x.re) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow x.im 2) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log x.re) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (/ (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (pow (log x.re) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log x.re) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow (log x.re) 2) (atan2 x.im x.re)) (/ (* (pow x.im 2) (* (log x.re) (atan2 x.im x.re))) (pow x.re 2))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re))) (/ (* (log x.re) (atan2 x.im x.re)) (pow x.re 2)))) (* (pow (log x.re) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (atan2 x.im x.re))))) (/ (* (log x.re) (atan2 x.im x.re)) (pow x.re 2)))) (* (pow (log x.re) 2) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (log x.re) (atan2 x.im x.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (/ (* (log x.re) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (atan2 x.im x.re) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (atan2 x.im x.re) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (atan2 x.im x.re) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/6 (/ (* (pow x.im 2) (atan2 x.im x.re)) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.re) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* (log x.re) (atan2 x.im x.re)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 2))) (* (log x.re) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log x.re) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 4))) (* 1/2 (/ (atan2 x.im x.re) (pow x.re 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* (log x.re) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (atan2 x.im x.re) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (atan2 x.im x.re) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (atan2 x.im x.re)) (pow x.re 6)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (log x.re) (sin (log (pow x.re y.im)))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (log x.re) (sin (log (pow x.re y.im)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (pow x.re 2)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 4))) (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (log x.re) (sin (log (pow x.re y.im)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (log (pow x.re y.im))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (log x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (log (pow x.re y.im))) (pow x.re 4))) (+ (* 1/4 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 4))) (+ (* (log x.re) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 6))) (+ (* 1/6 (/ (sin (log (pow x.re y.im))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow x.re 2))) (* (log x.re) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (log (pow x.re y.im))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/24 (/ (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (exp (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (sin (log (pow x.re y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6)))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6)))))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (pow x.im 2) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (pow x.im 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.im 2) (* y.im (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (/ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 6)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))))) (pow x.im 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ 1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (* (pow x.im 6) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ 1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4)) (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 6))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.im))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.im))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)) (+ (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4)) (/ (* (pow (log (/ 1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ 1 x.im)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (pow (log (/ 1 x.im)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.im))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1 (/ (* (pow (log (/ 1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (+ (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 6))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (pow (log (/ 1 x.im)) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)) (pow x.im 4))) (+ (* 1/720 (/ (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 6) (log (/ 1 x.im))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)) (pow x.im 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)) (pow x.im 6)) (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)) (pow x.im 4))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (pow x.im 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 6)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))))) (pow x.im 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2))) (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))) (pow x.im 4))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (* -1 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (* (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) 3)) (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (pow x.im 6)) (+ (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (cos (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (pow x.im 2))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (/ (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y.im 3) (pow (log (/ -1 x.im)) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (* (pow y.re 3) (pow (atan2 x.im x.re) 3)) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* 1/720 (* y.im (* y.re (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))))))) (* (pow x.im 6) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (* (pow x.im 4) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2))) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (+ (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)) (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 4) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (/ (* (- (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* -1/4 (* (pow x.re 4) (* y.im (* y.re (atan2 x.im x.re)))))) (- (/ (* (pow y.im 3) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re))))))) (/ (* (+ (* -1 (* (pow y.im 3) (pow (log (/ -1 x.im)) 3))) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (* -1 (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im))))) (* 1/2 (* (pow x.re 2) (* y.im (* y.re (atan2 x.im x.re))))))) (pow (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) 2)))) (* (pow x.im 6) (- (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* -1 (* y.im (* y.re (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) (pow x.im 2)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))))))))))) (pow x.im 2)) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4)) (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 6))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.im))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.im))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.im))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)) (+ (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4)) (/ (* (pow (log (/ -1 x.im)) 2) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ -1 x.im)) 2))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (pow (log (/ -1 x.im)) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.im))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))))) (* 1/2 (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) (pow x.im 6)) (/ (* y.re (+ (* -1/2 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow x.im 2))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/2 (/ (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/6 (/ (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/6 (/ (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (exp (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (pow (log (/ -1 x.im)) 3) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1 (/ (* (pow (log (/ -1 x.im)) 3) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (+ (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 6))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (pow (log (/ -1 x.im)) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)) (pow x.im 4))) (+ (* 1/720 (/ (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 6) (log (/ -1 x.im))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (pow x.im 6))) (* 1/2 (/ (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (pow x.im 4)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.im)) 2) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)) (pow x.im 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)) (pow x.im 6)) (/ (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)) (pow x.im 4))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow x.re 4) (atan2 x.im x.re)) (pow x.im 4))) (+ (* 1/720 (/ (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (atan2 x.im x.re)) (pow x.im 2)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (pow x.im 2))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (pow x.im 2)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 4))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 6))) (+ (* 1/720 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (pow x.im 6)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (sin (* -1 (* y.im (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (+ (sin (* y.re (atan2 x.im x.re))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (+ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* -1/6 (pow (atan2 x.im x.re) 3)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx y.re #s(hole binary64 y.re)) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+ (* -1 (/ (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* -1/6 (pow (atan2 x.im x.re) 3)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (- (* -1 (* y.re (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (- (* y.re (- (* -1 (/ (* y.re (* (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (+ (* -1 (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (pow (atan2 x.im x.re) 2) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* -1 (atan2 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* y.re (+ (* -1 (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* y.re (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1 (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (pow y.re 3) #s(hole binary64 (pow y.re 3))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (pow y.re 2))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (/ (+ (* -1 (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (pow y.re 2)))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (/ (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (* y.re (+ (* -1 (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))))) (pow y.re 2)))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (pow y.re 2))))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (/ (+ (* -1 (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (pow y.re 2)))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (pow y.re 2)))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (pow y.re 2)))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) y.re))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) y.re))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (/ (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) y.re))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (/ (+ (* y.re (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) y.re))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* y.re (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) y.re))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (* y.re (- (atan2 x.im x.re) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (* y.re (- (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (atan2 x.im x.re)) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (* y.re (- (+ (* y.re (- (* y.re (- (* -1/6 (pow (atan2 x.im x.re) 3)) (* -1 (* y.im (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))))))) (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (atan2 x.im x.re)) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* y.re (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* 1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) (* y.re (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1 (* y.im (* y.re (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))) (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* y.re (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (/ (+ (* (pow y.im 3) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (/ (+ (* (pow y.im 3) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* (pow y.re 3) (pow (atan2 x.im x.re) 3))) (- (+ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.re (- (+ (* -1 (/ (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))) (pow y.re 2))) (atan2 x.im x.re)) (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.re (- (+ (* -1 (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))))) (* (pow y.re 3) (atan2 x.im x.re)))) (atan2 x.im x.re)) (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (atan2 x.im x.re)))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (atan2 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* (pow y.re 3) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* (pow y.re 3) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) y.re)))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (pow y.re 2))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) y.re))))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) y.re))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (pow y.re 2))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) y.re)))))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) y.re)))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (/ (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) y.re))) y.re))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) y.re))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re)))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (- (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* y.re (atan2 x.im x.re)))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re)))) (+ (* -1 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))) (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re)))) y.re)) (* -1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) y.re)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (* -1 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* y.re (exp (* y.im (atan2 x.im x.re))))))) y.re)) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (* -1 (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* y.re (exp (* y.im (atan2 x.im x.re))))))) y.re)) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) y.re))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))) y.re))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) y.re)) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) y.re))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))))) y.re)) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) y.re)) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) y.re))))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) y.re)) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) y.re)))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (* -1 (/ (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))))) y.re)))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1 (/ (+ (* -1 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) y.re)) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) y.re))) y.re)) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))))))) (* -1 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) y.re)) (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (* -1 (/ (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) y.re))) y.re)) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) y.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (* -1/2 (/ (PI) y.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re)))) (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx y.im #s(hole binary64 y.im)) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* y.im (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re)))) (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* y.re (atan2 x.im x.re)))) (+ (* -1 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* y.re (atan2 x.im x.re)))))) (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (atan2 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (+ (* y.im (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.re (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (+ (* y.re (- (+ (* -1/2 (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ 1 x.re))) (* y.re (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ 1 x.re))) (+ (* y.im (- (* y.re (- (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))) (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* y.re (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ 1 x.re))) (+ (* y.im (- (+ (* y.im (- (+ (* 1/6 (pow (log (/ 1 x.re)) 3)) (* y.re (- (+ (* -1 (- (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))))) (+ (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* y.re (- (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* y.re (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))))))) (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re)))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (+ (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re))))) (* y.im (+ (* -1 (* y.im (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))) (* -1 (- (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (pow y.re 2))) (+ (* -1 (/ (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) y.re)) (+ (* -1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)) y.re)))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (pow y.re 2))) (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)) y.re)))))))) (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))))))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) #s(hole binary64 (+ (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re))))) (* y.im (+ (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2))))))) (* y.im (+ (* -1 (* y.im (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))) (* -1 (- (+ (* -1 (/ (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))) y.re)) (+ (* -1 (/ (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re))) y.re)) (+ (* -1/2 (/ (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4)))) y.re)) (+ (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))) y.re)))))) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)) (pow y.re 2))) (+ (* 1/2 (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)) y.re))))))))) (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))) (* -1 (- (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (pow y.re 2))) (+ (* -1 (/ (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) y.re)) (+ (* -1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)) y.re)))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (pow y.re 2))) (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)) y.re)))))))))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re)))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (+ (* y.im (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2))))))) (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* y.im (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))) (* -1 (- (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (pow y.re 2))) (+ (* -1 (/ (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) y.re)) (+ (* -1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)) y.re)))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (pow y.re 2))) (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)) y.re))))))) (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))))))) (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* y.im (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))) (* -1 (- (+ (* -1 (/ (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))) y.re)) (+ (* -1 (/ (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re))) y.re)) (+ (* -1/2 (/ (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4)))) y.re)) (+ (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))) y.re)))))) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)) (pow y.re 2))) (+ (* 1/2 (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)) y.re)))))))) (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))) (* -1 (- (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (pow y.re 2))) (+ (* -1 (/ (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) y.re)) (+ (* -1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)) y.re)))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (pow y.re 2))) (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)) y.re)))))))) (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))))))) (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re))))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (+ (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re)) (* y.im (+ (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))))))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (+ (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re)) (* y.im (+ (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (+ (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))) (* y.im (+ (* -1 (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))) (* -1 (- (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (pow y.re 2))) (+ (* -1 (/ (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) y.re)) (+ (* -1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)) y.re)))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (pow y.re 2))) (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)) y.re))))))))))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (+ (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re)) (* y.im (+ (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (+ (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))) (* y.im (+ (* -1 (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))) (+ (* -1 (- (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (pow y.re 2))) (+ (* -1 (/ (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) y.re)) (+ (* -1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)) y.re)))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (pow y.re 2))) (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)) y.re)))) (* y.im (+ (* -1 (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))) (* -1 (- (+ (* -1 (/ (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))) y.re)) (+ (* -1 (/ (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re))) y.re)) (+ (* -1/2 (/ (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4)))) y.re)) (+ (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))) y.re)))))) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)) (pow y.re 2))) (+ (* 1/2 (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)) y.re))))))))))))))))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* y.im (+ (* -1 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))) (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* y.im (+ (* -1 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* y.im (+ (* -1 (* y.im (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4)))))))))) (* -1 (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))))))))))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/6 (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))))) (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))))) (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* y.im (+ (* -1/6 (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))))))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3))))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1 (* y.im (* (cos (* 1/2 (PI))) (log (/ 1 x.re)))))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (* 1/2 (PI))))))))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* 1/2 (PI))))) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (pow (log (/ 1 x.re)) 3))))))))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (* 1/2 (PI)))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 1)) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))))))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/6 (* y.im (pow (log (/ 1 x.re)) 4))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (* -1/6 (* y.im (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (* 1/6 (pow (log (/ 1 x.re)) 4)))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* y.im (+ (* -1/6 (* y.im (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2)))))) (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (* 1/6 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 3))) (* (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 4))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* y.im (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* y.im (- (* y.im (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 3))) (* (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/6 (pow (log (/ 1 x.re)) 6))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 4))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* 1/6 (* (pow y.im 2) (pow (log (/ 1 x.re)) 6))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (pow (log (/ 1 x.re)) 8))) (* 1/6 (pow (log (/ 1 x.re)) 6)))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 4)) (* (pow y.im 2) (+ (* 1/6 (pow (log (/ 1 x.re)) 6)) (* (pow y.im 2) (+ (* -1/120 (pow (log (/ 1 x.re)) 8)) (* 1/5040 (* (pow y.im 2) (pow (log (/ 1 x.re)) 10))))))))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/6 (* (pow y.im 2) (pow (log (/ 1 x.re)) 3))))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (pow (log (/ 1 x.re)) 5))) (* 1/6 (pow (log (/ 1 x.re)) 3)))))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* (pow y.im 2) (+ (* 1/6 (pow (log (/ 1 x.re)) 3)) (* (pow y.im 2) (+ (* -1/120 (pow (log (/ 1 x.re)) 5)) (* 1/5040 (* (pow y.im 2) (pow (log (/ 1 x.re)) 7))))))))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4)))))))))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* y.im (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* y.im (- (* y.im (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))) (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 5))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 5))) (* (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4)))) (atan2 x.im x.re)))))) (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))) (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* y.im (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* 1/6 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2)))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 6) (pow (atan2 x.im x.re) 2)))) (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/120 (* (pow (log (/ 1 x.re)) 6) (pow (atan2 x.im x.re) 2))) (* 1/5040 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 8) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* 1/6 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 5) (pow (atan2 x.im x.re) 2)))) (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/120 (* (pow (log (/ 1 x.re)) 5) (pow (atan2 x.im x.re) 2))) (* 1/5040 (* (pow y.im 2) (* (pow (log (/ 1 x.re)) 7) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/2 (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/2 (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re))))))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re)))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (+ (* -1 (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2))))) (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re))))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re)) (* y.im (+ (* -1 (* y.im (- (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (pow y.re 2))) (+ (* -1 (/ (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) y.re)) (+ (* -1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)) y.re)))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (pow y.re 2))) (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)) y.re))))) (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2))))))))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re)) (* y.im (+ (* -1 (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))) (* y.im (+ (* -1 (* y.im (- (+ (* -1 (/ (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))) y.re)) (+ (* -1 (/ (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re))) y.re)) (+ (* -1/2 (/ (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4)))) y.re)) (+ (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))) y.re)))))) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)) (pow y.re 2))) (+ (* 1/2 (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)) y.re)))))) (* -1 (- (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (pow y.re 2))) (+ (* -1 (/ (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) y.re)) (+ (* -1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)) y.re)))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (pow y.re 2))) (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)) y.re))))))))))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (/ (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)) y.re))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) (pow y.re 2)))))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (+ (* y.im (- (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (pow y.re 2))) (+ (* -1 (/ (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) y.re)) (+ (* -1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)) y.re)))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (pow y.re 2))) (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)) y.re)))) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2))))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) (pow y.re 2)))))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) (pow y.re 2))) (+ (* -1 (/ (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) y.re)) (+ (* -1/2 (/ (pow (log (/ 1 x.re)) 3) y.re)) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)) y.re)) (+ (* y.im (- (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) (pow y.re 2))) (+ (* -1 (/ (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) y.re)) (+ (* -1/2 (/ (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (pow y.re 2))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)) y.re)) (* y.im (- (+ (* -1 (/ (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))) y.re)) (+ (* -1 (/ (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re))) y.re)) (+ (* -1/2 (/ (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4)))) y.re)) (+ (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (pow y.re 2))) (* 1/2 (/ (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))) y.re)))))) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)) (pow y.re 2))) (+ (* 1/2 (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)) y.re)))))))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) (pow y.re 2))) (/ (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)) y.re)))) (/ (pow (log (/ 1 x.re)) 2) (pow y.re 2))))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) (pow y.re 2)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) (pow y.re 2)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (/ (pow (log (/ 1 x.re)) 2) y.re))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (+ (* y.im (- (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re))))) (/ (pow (log (/ 1 x.re)) 2) y.re)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (+ (* y.im (- (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.im (- (+ (* -1 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1 (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)))) (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) y.re)) (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))))))) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)) y.re)) (+ (* 1/2 (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re))))) (/ (pow (log (/ 1 x.re)) 2) y.re)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re))))) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (/ (* y.im (pow (log (/ 1 x.re)) 2)) y.re))) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (/ (* y.im (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))) y.re)) (/ (pow (log (/ 1 x.re)) 2) y.re))))) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* y.im (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re))))) (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) y.re)))) (/ (pow (log (/ 1 x.re)) 2) y.re))))) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) y.re)) (* y.im (+ (* -1 (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)))) (* y.im (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re))) (atan2 x.im x.re))))))))) (/ (pow (log (/ 1 x.re)) 2) y.re))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* -1 (/ (* y.im (pow (log (/ 1 x.re)) 2)) y.re)))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (* -1 (/ (pow (log (/ 1 x.re)) 2) y.re)) (/ (* y.im (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))) y.re))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (* -1 (/ (pow (log (/ 1 x.re)) 2) y.re)) (* y.im (- (* y.im (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)))) (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) y.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (* -1 (/ (pow (log (/ 1 x.re)) 2) y.re)) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3)) y.re)) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re)) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re))) (atan2 x.im x.re)))))) (* 1/6 (/ (pow (log (/ 1 x.re)) 4) y.re))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)) (/ (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)) y.re)))) (* -1 (/ (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)) y.re)))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 2))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* 1/6 (* (pow y.im 2) (pow (log (/ 1 x.re)) 4))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (pow (log (/ 1 x.re)) 6))) (* 1/6 (pow (log (/ 1 x.re)) 4)))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* (pow y.im 2) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* (pow y.im 2) (+ (* -1/120 (pow (log (/ 1 x.re)) 6)) (* 1/5040 (* (pow y.im 2) (pow (log (/ 1 x.re)) 8))))))))))) |
#s(approx (* y.re (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 y.re)) |
#s(approx (* y.re (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ y.re (* y.im (* y.re (atan2 x.im x.re)))))) |
#s(approx (* y.re (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ y.re (* y.im (+ (* 1/2 (* y.im (* y.re (pow (atan2 x.im x.re) 2)))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (* y.re (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ y.re (* y.im (+ (* y.im (+ (* 1/6 (* y.im (* y.re (pow (atan2 x.im x.re) 3)))) (* 1/2 (* y.re (pow (atan2 x.im x.re) 2))))) (* y.re (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.im (- (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re))))))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.im (- (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.im (- (+ (* -1 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) y.re)) (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))))))) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)) y.re)) (+ (* 1/2 (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re))))))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))))))))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.im (- (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.im (- (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.im (- (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) y.re)) (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))))) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)) y.re)) (+ (* 1/2 (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.im (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.im (- (* y.im (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 5))) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 5))) (* (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4)))) (atan2 x.im x.re)))))) (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (* -1 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (* -1/2 (pow (log (/ 1 x.re)) 3))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (* y.im (- (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re))))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (* y.im (- (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.im (- (+ (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) y.re)) (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))))) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)) y.re)) (+ (* 1/2 (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re))))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 3))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* y.im (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* y.im (- (* y.im (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3))) (* (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/6 (pow (log (/ 1 x.re)) 5))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 3))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* 1/6 (* (pow y.im 2) (pow (log (/ 1 x.re)) 5))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* (pow y.im 2) (+ (* -1/120 (* (pow y.im 2) (pow (log (/ 1 x.re)) 7))) (* 1/6 (pow (log (/ 1 x.re)) 5)))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 3)) (* (pow y.im 2) (+ (* 1/6 (pow (log (/ 1 x.re)) 5)) (* (pow y.im 2) (+ (* -1/120 (pow (log (/ 1 x.re)) 7)) (* 1/5040 (* (pow y.im 2) (pow (log (/ 1 x.re)) 9))))))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (* y.im (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (* y.im (- (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (* y.im (- (* 1/6 (/ (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) y.re)) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)) y.re)) (+ (* 1/2 (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) y.re)) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)) y.re)) (* (- (* -1 (/ (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re))) y.re)) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re)) (atan2 x.im x.re)))))) (/ (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)) y.re))) (/ (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) y.re)))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1 (- (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))))) (+ (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))))))))))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) (pow (log (/ 1 x.re)) 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (pow (log (/ 1 x.re)) 2))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* y.im (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* y.im (- (* y.im (- (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (pow (log (/ 1 x.re)) 2)) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* (- (* 1/6 (pow (log (/ 1 x.re)) 4)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/6 (pow (log (/ 1 x.re)) 4))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))))) (* -1 (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))) (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (- (* 1/6 (pow (log (/ 1 x.re)) 5)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* -1/6 (- (* 1/6 (pow (log (/ 1 x.re)) 6)) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* 1/2 (- (* 1/6 (* (pow (log (/ 1 x.re)) 4) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4))) (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 4)))))))))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1 (- (* -1/2 (* (pow (log (/ 1 x.re)) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (pow (log (/ 1 x.re)) 4) (atan2 x.im x.re))) (+ (* -1/6 (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (- (* -1/2 (* (pow (log (/ 1 x.re)) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))) (* y.re (+ (* -1 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 2) (atan2 x.im x.re)))) (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (/ 1 x.re)) 4)) (* 1/2 (- (* -1 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1 (* (log (/ 1 x.re)) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* y.im (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* y.im (- (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (- (* 1/6 (* (cos (* 1/2 (PI))) (* (pow (log (/ 1 x.re)) 3) (atan2 x.im x.re)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (/ 1 x.re)) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* -1 (* (cos (* 1/2 (PI))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* y.im (* (log (/ 1 x.re)) (atan2 x.im x.re))))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* y.im (- (* y.im (- (* 1/6 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/6 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 3))) (* (- (* 1/6 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/6 (pow (log (/ 1 x.re)) 3))) (+ (* -1/2 (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* -1 (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.im (- (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (+ (* y.im (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (+ (* y.re (- (+ (* -1/2 (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (* y.re (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* y.re (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (- (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1/2 (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* y.im (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* y.im (- (+ (* y.im (- (* (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))) (+ (* 1/2 (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (pow (atan2 x.im x.re) 2))) (* (- (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 1)) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re)))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (- (* -1 (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re)))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))) (+ (* -1/2 (pow (atan2 x.im x.re) 3)) (* 1/6 (pow (atan2 x.im x.re) 3)))))) (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* y.im (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* y.im (* (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (atan2 x.im x.re) 2))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.im (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* 1/24 (* y.im (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 1)) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (- (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (+ (* y.im (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (* (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* y.im (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* y.re (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (+ (* y.re (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/2 (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))) (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* y.im (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* y.im (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* y.im (- (+ (* y.im (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))) (+ (* 1/2 (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (pow (atan2 x.im x.re) 2))) (* (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1/6 (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.im (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* y.im (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 6))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 5))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (pow (atan2 x.im x.re) 3))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1 (* y.im (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (pow (atan2 x.im x.re) 5)) (* 1/2 (pow (atan2 x.im x.re) 5))))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (pow (atan2 x.im x.re) 5)) (* 1/2 (pow (atan2 x.im x.re) 5))) (atan2 x.im x.re))) (+ (* -1/2 (pow (atan2 x.im x.re) 6)) (* 1/6 (pow (atan2 x.im x.re) 6)))))) (+ (* -1 (pow (atan2 x.im x.re) 5)) (* 1/2 (pow (atan2 x.im x.re) 5))))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 3)))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/6 (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* y.im (+ (* 1/6 (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (+ (* y.im (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (* (- (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* y.im (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/2 (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))) (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* 1/2 (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* 1/2 (* y.im (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (* 1/2 (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5) (atan2 x.im x.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))))) (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (- (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4)))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))) (* (- (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (atan2 x.im x.re))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))))))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* y.im (- (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (+ (* 1/6 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))))))) (+ (* 1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (+ (* (- (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (atan2 x.im x.re))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (pow (atan2 x.im x.re) 3)) (* 1/2 (pow (atan2 x.im x.re) 3))))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (pow (atan2 x.im x.re) 3)) (* 1/2 (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))) (+ (* -1/2 (pow (atan2 x.im x.re) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))) (+ (* -1 (pow (atan2 x.im x.re) 3)) (* 1/2 (pow (atan2 x.im x.re) 3))))) (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (* y.im (+ (* y.im (- (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (- (+ (* y.im (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (* (- (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.im (- (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (+ (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (* (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (neg y.im) #s(hole binary64 (* -1 y.im))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.im (- (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow y.im 2)))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* y.im (- (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.re (* (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (pow y.im 3) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (+ (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)) (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* (pow y.im 2) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* (pow y.im 2) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re)))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (PI) y.im)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (/ (PI) y.im)))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) #s(hole binary64 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) #s(hole binary64 (+ (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(hole binary64 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) #s(hole binary64 (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* (pow y.im 2) (- (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* (pow y.im 2) (- (/ (sin (* y.re (atan2 x.im x.re))) (pow y.im 2)) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* 1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (- (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* -1 (* y.re (atan2 x.im x.re)))) y.im))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* y.re (* (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) y.im)) (* -1 (* y.re (atan2 x.im x.re)))) y.im))))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) #s(hole binary64 (* -1 (* y.im (+ (log (/ 1 x.re)) (* -1/2 (/ (PI) y.im))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1/2 (/ (PI) y.im))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* (pow y.im 2) (- (* -1 (/ (- (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im)) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))))) |
| Outputs |
|---|
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) |
(log.f64 (hypot.f64 x.re x.im)) |
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) |
(hypot.f64 x.re x.im) |
(fma.f64 x.re x.re (*.f64 x.im x.im)) |
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) |
(*.f64 x.re x.re) |
x.re |
(*.f64 x.im x.im) |
x.im |
y.re |
(*.f64 (atan2.f64 x.im x.re) y.im) |
(atan2.f64 x.im x.re) |
y.im |
(sin.f64 #s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (atan2.f64 x.im x.re))) |
(*.f64 y.re (atan2.f64 x.im x.re)) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))) |
(*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re))))) |
#s(literal -1 binary64) |
(*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))) |
(pow.f64 y.re #s(literal 3 binary64)) |
#s(literal 3 binary64) |
(fma.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re))) |
(+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re))) |
(*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
(fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
(+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
(*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(literal -1/6 binary64) |
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
(sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
(fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) |
(log.f64 (/.f64 #s(literal 1 binary64) x.re)) |
(/.f64 #s(literal 1 binary64) x.re) |
#s(literal 1 binary64) |
(*.f64 #s(literal 1/2 binary64) (PI.f64)) |
#s(literal 1/2 binary64) |
(PI.f64) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) |
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))) |
(*.f64 y.im (atan2.f64 x.im x.re)) |
(fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
(+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
(*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
(pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) |
(sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
(*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) |
(pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) |
(*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) |
(*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)) |
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re) |
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
(+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
(*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
(+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) |
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
(+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(literal -1/2 binary64) |
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(+.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
(/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
(fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(+.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) |
(+.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) |
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
(*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
(sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) |
(log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) |
(pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im) |
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) |
(fma.f64 x.im x.im (*.f64 x.re x.re)) |
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) |
(fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))) |
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) |
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))) |
(+.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) |
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
(fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))))))) |
(+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))))))) |
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
(sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(+.f64 (*.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(/.f64 (PI.f64) #s(literal 2 binary64)) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
(fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))) |
(+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))) |
#s(literal 1/6 binary64) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))))) |
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)) |
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)) |
(fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
(+.f64 (*.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
(sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) |
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) |
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)) |
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) |
(log.f64 (hypot.f64 x.re x.im)) |
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))) |
(hypot.f64 x.re x.im) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
(-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) |
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) |
(*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) |
(neg.f64 y.im) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) |
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) |
(*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
(*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) |
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))))))))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.im)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im)) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (pow.f64 x.im #s(literal 2 binary64))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) |
#s(approx (* x.re x.re) (pow.f64 x.re #s(literal 2 binary64))) |
#s(approx x.re x.re) |
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re))) |
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re)) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))) |
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) (+.f64 (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) |
#s(approx (* y.im (log (/ 1 x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 x.re)))) |
#s(approx (log (/ 1 x.re)) (*.f64 #s(literal -1 binary64) (log.f64 x.re))) |
#s(approx (/ 1 x.re) (/.f64 #s(literal 1 binary64) x.re)) |
#s(approx (pow (atan2 x.im x.re) 3) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* y.im (atan2 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))))) |
#s(approx (pow (log (/ 1 x.re)) 3) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) (sin.f64 (*.f64 y.im (log.f64 x.re)))) |
#s(approx (* -1 (* y.im (log (/ 1 x.re)))) (*.f64 y.im (log.f64 x.re))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (pow (atan2 x.im x.re) 2) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)))) |
#s(approx (pow (log (/ 1 x.re)) 2) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.im (log.f64 x.re)))))) |
#s(approx (* y.re (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (log.f64 (pow.f64 x.im y.im))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (+.f64 (log.f64 (pow.f64 x.im y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (+.f64 (log.f64 (pow.f64 x.im y.im)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (+.f64 (log.f64 (pow.f64 x.im y.im)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 x.im y.im)) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (pow.f64 x.im y.im))) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 x.im y.im))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.im y.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.im)))) (pow.f64 x.im y.im))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.im y.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.im)))))) (pow.f64 x.im y.im))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.im) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im)))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.im #s(literal 2 binary64))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (+.f64 (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.im)) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 (log.f64 x.im) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (log.f64 x.im))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (+.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))))))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (/.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 (log.f64 x.im) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (atan2.f64 x.im x.re) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 (log.f64 x.im) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (atan2.f64 x.im x.re) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (atan2.f64 x.im x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (/.f64 (atan2.f64 x.im x.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (log.f64 x.im) (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (log.f64 x.im))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (log.f64 x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))))))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))))))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (pow.f64 x.re #s(literal 2 binary64))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (* y.im (log (/ 1 x.re))) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (log (/ 1 x.re)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (pow (log (/ 1 x.re)) 3) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (* -1 (* y.im (log (/ 1 x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) |
#s(approx (pow (log (/ 1 x.re)) 2) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.re) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (pow.f64 x.re #s(literal 2 binary64))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re) (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) (+.f64 (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (* y.im (log (/ 1 x.re))) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (log (/ 1 x.re)) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64)))) |
#s(approx (pow (log (/ 1 x.re)) 3) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) |
#s(approx (* -1 (* y.im (log (/ 1 x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (pow (log (/ 1 x.re)) 2) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.re)) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re) (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))))))))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64)))))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re)) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (* x.im x.im) (pow.f64 x.im #s(literal 2 binary64))) |
#s(approx x.im x.im) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (fma.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (log.f64 (pow.f64 x.re y.im))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (+.f64 (log.f64 (pow.f64 x.re y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (+.f64 (log.f64 (pow.f64 x.re y.im)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (+.f64 (log.f64 (pow.f64 x.re y.im)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 x.re y.im)) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (pow.f64 x.re y.im))) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 x.re y.im))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.re y.im)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.im)))) (pow.f64 x.re y.im))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.re y.im)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.im) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.im)))))) (pow.f64 x.re y.im))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re)))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (+.f64 (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.re)) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 (log.f64 x.re) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (log.f64 x.re))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (+.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))))))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (+.f64 (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (/.f64 (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (atan2.f64 x.im x.re)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 (log.f64 x.re) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (atan2.f64 x.im x.re) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 (log.f64 x.re) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (atan2.f64 x.im x.re) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (atan2.f64 x.im x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64)))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (log.f64 x.re) (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (log.f64 x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (log.f64 x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (/.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))))))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (/.f64 (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re) (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im)) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re)))))) (-.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.im)) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))))))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re) (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal 1/720 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 y.re (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx y.re y.re) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (-.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (pow y.re 3) (pow.f64 y.re #s(literal 3 binary64))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 y.re #s(literal 2 binary64))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 y.re #s(literal 2 binary64)))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) (pow.f64 y.re #s(literal 2 binary64)))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 y.re #s(literal 2 binary64))))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 y.re #s(literal 2 binary64)))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 y.re #s(literal 2 binary64)))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 y.re #s(literal 2 binary64)))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) y.re)) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) y.re)) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) (/.f64 (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) y.re)) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) (/.f64 (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) y.re)) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) y.re)) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (*.f64 y.re (-.f64 (atan2.f64 x.im x.re) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (*.f64 y.re (-.f64 (fma.f64 y.re (-.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re)))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))) (atan2.f64 x.im x.re)))) |
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (atan2.f64 x.im x.re)))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal 1/120 binary64) (*.f64 y.im (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 y.im (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))))) (*.f64 #s(literal 1/120 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))))))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (sin.f64 (/.f64 (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re) (atan2.f64 x.im x.re)))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re)))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re)))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re))))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) y.re))) y.re)) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re)) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re))))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (atan2.f64 x.im x.re)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) y.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re)))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) y.re))) y.re) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) y.re)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) y.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))) |
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx y.im y.im) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (-.f64 (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 y.re (-.f64 (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 y.re (-.f64 (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 y.im (-.f64 (*.f64 y.re (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) y.re)))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 y.re #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) y.re))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) y.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 y.re #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)) y.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 y.re #s(literal 2 binary64)))))))))))) |
#s(approx (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) y.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 y.re #s(literal 2 binary64))))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) y.re) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) y.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 y.re #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)) y.re))))))))))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) y.re))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) (fma.f64 y.im (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 y.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) y.re)))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) (fma.f64 y.im (fma.f64 y.im (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 y.re #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)) y.re)))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 y.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) y.re)))))) |
#s(approx (* (pow y.re 3) (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)))) (fma.f64 y.im (fma.f64 y.im (fma.f64 y.im (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) y.re) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) y.re))))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 y.re #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)) y.re))))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 y.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) y.re)))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) y.re)))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) (fma.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) y.re) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 y.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) (fma.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) y.re) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 y.re #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)) y.re)))))))))))) |
#s(approx (+ (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re))) (fma.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) y.re) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 y.re #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)) y.re))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) y.re) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) y.re)))))))))))))))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))) |
#s(approx (* -1 (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))))))))))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) |
#s(approx (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re))))))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) |
#s(approx (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))))))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(literal 1 binary64)) |
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re))))) |
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))) |
#s(approx (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))))))))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))))))) |
#s(approx (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 8 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64)))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/120 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 8 binary64))) (*.f64 #s(literal 1/5040 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 10 binary64))))))))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))))))) |
#s(approx (sin (* -1 (* y.im (log (/ 1 x.re))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/120 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (*.f64 #s(literal 1/5040 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 7 binary64))))))))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) |
#s(approx (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/5040 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 8 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) |
#s(approx (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/5040 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 7 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) |
#s(approx (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) y.re))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 y.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) y.re)))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) y.re) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 y.re #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)) y.re)))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 y.re #s(literal 2 binary64))))))))) |
#s(approx (* -1 (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) y.re) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) y.re) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) y.re))))) (*.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 y.re #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)) y.re)))))))))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) y.re)) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 y.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) (pow.f64 y.re #s(literal 2 binary64)))))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 y.re #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)) y.re))) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 y.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) (pow.f64 y.re #s(literal 2 binary64)))))) |
#s(approx (/ (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) y.re) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) y.re) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 y.re #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)) y.re))) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 y.re #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) (pow.f64 y.re #s(literal 2 binary64)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) y.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) y.re)))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) y.re) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) y.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) y.re)))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)))) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/.f64 (*.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) y.re)) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) y.re) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) y.re)))) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re))) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) y.re)))) |
#s(approx (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re)) (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) y.re)))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) y.re))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) y.re)) (/.f64 (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) y.re)))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) y.re) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (* y.re (exp (* y.im (atan2 x.im x.re))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) y.re) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re)) (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) y.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)))))))) |
#s(approx (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/120 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (*.f64 #s(literal 1/5040 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 8 binary64))))))))))) |
#s(approx (* y.re (exp (* y.im (atan2 x.im x.re)))) y.re) |
#s(approx (* y.re (exp (* y.im (atan2 x.im x.re)))) (+.f64 y.re (*.f64 y.im (*.f64 y.re (atan2.f64 x.im x.re))))) |
#s(approx (* y.re (exp (* y.im (atan2 x.im x.re)))) (+.f64 y.re (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* y.re (exp (* y.im (atan2 x.im x.re)))) (+.f64 y.re (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) y.re) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) y.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re))) |
#s(approx (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) y.re) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) y.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) |
#s(approx (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re) (*.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re))) |
#s(approx (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) y.re) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) y.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 7 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)))))))) |
#s(approx (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/120 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 7 binary64))) (*.f64 #s(literal 1/5040 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 9 binary64))))))))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re)) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (* y.re (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) y.re)) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) y.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.re) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)) y.re))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 y.im (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) |
#s(approx (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.im (-.f64 (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))) (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64)) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (atan2.f64 x.im x.re))))) |
#s(approx (/ 1 (exp (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 y.im (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))))))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))))))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) |
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(literal 1 binary64)) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (fma.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))))))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 y.im (fma.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 y.im (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 y.im (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))))))))))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 y.im (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))))))))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (fma.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 y.im (-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (atan2.f64 x.im x.re)) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (fma.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (*.f64 y.im (fma.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.im (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 y.im (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (neg y.im) (*.f64 #s(literal -1 binary64) y.im)) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im) (atan2.f64 x.im x.re)))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.im (-.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 y.im #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.im (-.f64 (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) |
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) |
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im)) |
#s(approx (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) |
#s(approx (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im))))) |
#s(approx (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) |
#s(approx (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im)))) |
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)))))) |
#s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)))))) |
#s(approx (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (+.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.im)))))) |
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.im)))))) |
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) y.im)) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) y.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
#s(approx (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
Compiled 3 025 780 to 46 378 computations (98.5% saved)
16 alts after pruning (6 fresh and 10 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 5 191 | 3 | 5 194 |
| Fresh | 2 | 3 | 5 |
| Picked | 1 | 4 | 5 |
| Done | 0 | 6 | 6 |
| Total | 5 194 | 16 | 5 210 |
| Status | Accuracy | Program |
|---|---|---|
| 25.2% | (*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) | |
| ✓ | 56.8% | (*.f64 (/.f64 #s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| ✓ | 39.6% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
| 36.9% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) | |
| 33.1% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) | |
| ✓ | 20.6% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))))) |
| ✓ | 54.5% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
| ✓ | 34.5% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
| ✓ | 34.3% | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
| ✓ | 9.4% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
| ✓ | 7.4% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
| ✓ | 30.0% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
| 13.4% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) #s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) | |
| ✓ | 19.6% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
| 10.7% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))))) | |
| 7.5% | #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
Compiled 13 006 to 1 844 computations (85.8% saved)
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) #s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
(*.f64 (exp.f64 #s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (/.f64 #s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Outputs |
|---|
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
5 calls:
| 12.0ms | x.re |
| 9.0ms | y.im |
| 9.0ms | y.re |
| 9.0ms | x.im |
| 7.0ms | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Accuracy | Segments | Branch |
|---|---|---|
| 79.3% | 3 | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| 75.0% | 1 | x.re |
| 75.0% | 1 | x.im |
| 80.1% | 3 | y.re |
| 75.0% | 1 | y.im |
Compiled 41 to 35 computations (14.6% saved)
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) #s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
(*.f64 (exp.f64 #s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (/.f64 #s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Outputs |
|---|
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (/.f64 #s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
1 calls:
| 9.0ms | y.re |
| Accuracy | Segments | Branch |
|---|---|---|
| 79.5% | 3 | y.re |
Compiled 1 to 4 computations (-300% saved)
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) #s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
(*.f64 (exp.f64 #s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
| Outputs |
|---|
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
5 calls:
| 10.0ms | x.im |
| 8.0ms | y.im |
| 8.0ms | y.re |
| 8.0ms | x.re |
| 7.0ms | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Accuracy | Segments | Branch |
|---|---|---|
| 65.2% | 2 | x.re |
| 70.7% | 3 | x.im |
| 67.0% | 4 | y.im |
| 67.1% | 3 | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| 64.8% | 3 | y.re |
Compiled 41 to 35 computations (14.6% saved)
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) #s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
(*.f64 (exp.f64 #s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
| Outputs |
|---|
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
2 calls:
| 8.0ms | x.im |
| 6.0ms | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Accuracy | Segments | Branch |
|---|---|---|
| 67.1% | 3 | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| 64.3% | 2 | x.im |
Compiled 38 to 23 computations (39.5% saved)
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) #s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
(*.f64 (exp.f64 #s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))) |
| Outputs |
|---|
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
2 calls:
| 9.0ms | x.re |
| 6.0ms | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Accuracy | Segments | Branch |
|---|---|---|
| 64.4% | 3 | x.re |
| 66.3% | 3 | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
Compiled 38 to 23 computations (39.5% saved)
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) #s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
(*.f64 (exp.f64 #s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Outputs |
|---|
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) |
2 calls:
| 6.0ms | x.im |
| 5.0ms | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Accuracy | Segments | Branch |
|---|---|---|
| 64.9% | 5 | x.im |
| 63.8% | 2 | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
Compiled 38 to 23 computations (39.5% saved)
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) #s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
(*.f64 (exp.f64 #s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
| Outputs |
|---|
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
5 calls:
| 7.0ms | x.re |
| 6.0ms | y.im |
| 6.0ms | x.im |
| 6.0ms | y.re |
| 5.0ms | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Accuracy | Segments | Branch |
|---|---|---|
| 56.7% | 2 | x.im |
| 57.8% | 3 | x.re |
| 47.2% | 1 | y.re |
| 48.8% | 2 | y.im |
| 55.2% | 2 | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
Compiled 41 to 35 computations (14.6% saved)
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) #s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
(*.f64 (exp.f64 #s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
| Outputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
5 calls:
| 5.0ms | y.im |
| 5.0ms | x.im |
| 5.0ms | y.re |
| 5.0ms | x.re |
| 4.0ms | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Accuracy | Segments | Branch |
|---|---|---|
| 39.9% | 3 | y.re |
| 44.3% | 5 | y.im |
| 49.8% | 4 | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| 49.7% | 3 | x.re |
| 49.1% | 3 | x.im |
Compiled 41 to 35 computations (14.6% saved)
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) #s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (+ (pow (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) 3) (pow (* (atan2 x.im x.re) y.re) 3)) (+ (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (- (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (-.f64 (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) |
(*.f64 (exp.f64 #s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) |
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))) |
| Outputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
2 calls:
| 8.0ms | x.re |
| 4.0ms | x.im |
| Accuracy | Segments | Branch |
|---|---|---|
| 48.0% | 3 | x.im |
| 50.4% | 4 | x.re |
Compiled 2 to 8 computations (-300% saved)
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) #s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
| Outputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
3 calls:
| 3.0ms | x.im |
| 3.0ms | x.re |
| 2.0ms | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Accuracy | Segments | Branch |
|---|---|---|
| 43.9% | 2 | x.im |
| 30.8% | 1 | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| 46.1% | 2 | x.re |
Compiled 39 to 27 computations (30.8% saved)
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) #s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
| Outputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
4 calls:
| 3.0ms | y.im |
| 3.0ms | x.im |
| 3.0ms | y.re |
| 3.0ms | x.re |
| Accuracy | Segments | Branch |
|---|---|---|
| 30.0% | 1 | y.re |
| 30.0% | 1 | y.im |
| 38.3% | 2 | x.im |
| 36.7% | 2 | x.re |
Compiled 4 to 16 computations (-300% saved)
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) #s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
| Outputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
5 calls:
| 4.0ms | x.re |
| 3.0ms | y.im |
| 2.0ms | x.im |
| 2.0ms | y.re |
| 2.0ms | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Accuracy | Segments | Branch |
|---|---|---|
| 19.9% | 1 | y.re |
| 19.9% | 1 | y.im |
| 19.9% | 1 | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| 19.9% | 1 | x.re |
| 19.9% | 1 | x.im |
Compiled 41 to 35 computations (14.6% saved)
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) #s(approx (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
| Outputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
5 calls:
| 2.0ms | y.im |
| 2.0ms | x.im |
| 2.0ms | x.re |
| 2.0ms | y.re |
| 2.0ms | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Accuracy | Segments | Branch |
|---|---|---|
| 19.6% | 1 | x.re |
| 19.6% | 1 | x.im |
| 19.6% | 1 | y.re |
| 19.6% | 1 | y.im |
| 19.6% | 1 | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
Compiled 41 to 35 computations (14.6% saved)
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))))) |
| Outputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))))) |
5 calls:
| 2.0ms | x.im |
| 2.0ms | y.im |
| 2.0ms | x.re |
| 2.0ms | y.re |
| 1.0ms | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Accuracy | Segments | Branch |
|---|---|---|
| 10.7% | 1 | x.re |
| 10.7% | 1 | x.im |
| 10.7% | 1 | y.im |
| 10.7% | 1 | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| 10.7% | 1 | y.re |
Compiled 41 to 35 computations (14.6% saved)
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
| Outputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
5 calls:
| 2.0ms | y.im |
| 1.0ms | x.im |
| 1.0ms | y.re |
| 1.0ms | x.re |
| 1.0ms | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Accuracy | Segments | Branch |
|---|---|---|
| 9.4% | 1 | x.re |
| 9.4% | 1 | y.re |
| 9.4% | 1 | x.im |
| 9.4% | 1 | y.im |
| 9.4% | 1 | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
Compiled 41 to 35 computations (14.6% saved)
Total -0.0b remaining (-0%)
Threshold costs -0b (-0%)
| Inputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
| Outputs |
|---|
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
5 calls:
| 1.0ms | y.im |
| 1.0ms | x.re |
| 1.0ms | x.im |
| 1.0ms | y.re |
| 1.0ms | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| Accuracy | Segments | Branch |
|---|---|---|
| 7.5% | 1 | x.re |
| 7.5% | 1 | y.re |
| 7.5% | 1 | (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) |
| 7.5% | 1 | y.im |
| 7.5% | 1 | x.im |
Compiled 41 to 35 computations (14.6% saved)
| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 47.0ms | 0.002537838940059032 | 117255070904.44759 |
| 25.0ms | -0.1392054084815369 | -0.005220189074485937 |
| 33.0ms | 65× | 1 | valid |
| 26.0ms | 207× | 0 | valid |
Compiled 1 230 to 788 computations (35.9% saved)
adjust: 14.0ms (28% of total)ival-mult: 10.0ms (20% of total)ival-hypot: 7.0ms (14% of total)ival-log: 5.0ms (10% of total)ival-sin: 5.0ms (10% of total)ival-exp: 3.0ms (6% of total)ival-atan2: 3.0ms (6% of total)ival-add: 1.0ms (2% of total)ival-sub: 1.0ms (2% of total)ival-assert: 0.0ms (0% of total)ival-true: 0.0ms (0% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 21.0ms | 0.002537838940059032 | 117255070904.44759 |
| 40.0ms | -0.1392054084815369 | -0.005220189074485937 |
| 36.0ms | 147× | 0 | valid |
| 15.0ms | 45× | 1 | valid |
Compiled 1 349 to 907 computations (32.8% saved)
ival-mult: 24.0ms (53.3% of total)ival-hypot: 5.0ms (11.1% of total)ival-log: 4.0ms (8.9% of total)ival-sin: 3.0ms (6.7% of total)adjust: 2.0ms (4.4% of total)ival-exp: 2.0ms (4.4% of total)ival-atan2: 2.0ms (4.4% of total)ival-add: 1.0ms (2.2% of total)ival-sub: 1.0ms (2.2% of total)ival-assert: 0.0ms (0% of total)ival-true: 0.0ms (0% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 37.0ms | 5.831630074889414e+154 | 9.467941554663225e+160 |
| 30.0ms | -7.912803539911844e-100 | -4.723198627204133e-102 |
| 36.0ms | 100× | 1 | valid |
| 18.0ms | 155× | 0 | valid |
| 1.0ms | 1× | 2 | valid |
Compiled 1 670 to 944 computations (43.5% saved)
ival-mult: 11.0ms (23.9% of total)ival-hypot: 9.0ms (19.5% of total)ival-log: 6.0ms (13% of total)ival-sin: 6.0ms (13% of total)adjust: 5.0ms (10.9% of total)ival-atan2: 4.0ms (8.7% of total)ival-exp: 2.0ms (4.3% of total)ival-sub: 1.0ms (2.2% of total)ival-add: 1.0ms (2.2% of total)ival-assert: 0.0ms (0% of total)ival-true: 0.0ms (0% of total)| 2× | left-value |
| Time | Left | Right |
|---|---|---|
| 0.0ms | +inf | NaN |
| 0.0ms | -inf | -0.9849715354060288 |
Compiled 40 to 26 computations (35% saved)
| 2× | left-value |
| Time | Left | Right |
|---|---|---|
| 0.0ms | +inf | NaN |
| 0.0ms | -inf | -0.9849715354060288 |
Compiled 40 to 26 computations (35% saved)
| 1× | left-value |
| Time | Left | Right |
|---|---|---|
| 0.0ms | 0.3134454528746674 | 0.8740214356519027 |
Compiled 40 to 26 computations (35% saved)
| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 40.0ms | 2019179655958.0994 | 213275494236129540.0 |
| 19.0ms | 53× | 1 | valid |
| 11.0ms | 91× | 0 | valid |
Compiled 1 192 to 689 computations (42.2% saved)
ival-mult: 6.0ms (24.1% of total)ival-hypot: 4.0ms (16% of total)adjust: 3.0ms (12% of total)ival-log: 3.0ms (12% of total)ival-sin: 3.0ms (12% of total)ival-atan2: 2.0ms (8% of total)ival-exp: 1.0ms (4% of total)ival-sub: 1.0ms (4% of total)ival-add: 1.0ms (4% of total)ival-assert: 0.0ms (0% of total)ival-true: 0.0ms (0% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 0.0ms | 6.380409337315841e-225 | 6.711324263107458e-225 |
| 39.0ms | -3.0052506257116667e+156 | -1.0917918255832681e+147 |
| 19.0ms | 54× | 1 | valid |
| 11.0ms | 90× | 0 | valid |
Compiled 1 939 to 941 computations (51.5% saved)
ival-mult: 6.0ms (24.8% of total)ival-hypot: 4.0ms (16.5% of total)adjust: 3.0ms (12.4% of total)ival-log: 3.0ms (12.4% of total)ival-sin: 3.0ms (12.4% of total)ival-atan2: 2.0ms (8.3% of total)ival-add: 1.0ms (4.1% of total)ival-exp: 1.0ms (4.1% of total)ival-sub: 1.0ms (4.1% of total)ival-assert: 0.0ms (0% of total)ival-true: 0.0ms (0% of total)| 3× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 0.0ms | 6.380409337315841e-225 | 6.711324263107458e-225 |
| 28.0ms | -2.0925436625106e-92 | -1.0483907898213056e-93 |
| 46.0ms | -5.7382979996026785e+85 | -1.914933983537335e+81 |
| 44.0ms | 92× | 1 | valid |
| 18.0ms | 148× | 0 | valid |
Compiled 2 605 to 1 148 computations (55.9% saved)
ival-mult: 22.0ms (41.5% of total)ival-hypot: 7.0ms (13.2% of total)ival-log: 6.0ms (11.3% of total)adjust: 5.0ms (9.4% of total)ival-sin: 5.0ms (9.4% of total)ival-atan2: 4.0ms (7.5% of total)ival-exp: 2.0ms (3.8% of total)ival-sub: 1.0ms (1.9% of total)ival-add: 1.0ms (1.9% of total)ival-assert: 0.0ms (0% of total)ival-true: 0.0ms (0% of total)| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 0.0ms | 6.380409337315841e-225 | 6.711324263107458e-225 |
Compiled 40 to 23 computations (42.5% saved)
| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 43.0ms | -4.517837231988146e-298 | 3.25419345255431e-305 |
| 20.0ms | 54× | 1 | valid |
| 12.0ms | 106× | 0 | valid |
Compiled 7 690 to 1 753 computations (77.2% saved)
ival-mult: 6.0ms (22.7% of total)ival-hypot: 4.0ms (15.1% of total)ival-log: 4.0ms (15.1% of total)adjust: 3.0ms (11.3% of total)ival-exp: 3.0ms (11.3% of total)ival-sin: 3.0ms (11.3% of total)ival-sub: 1.0ms (3.8% of total)ival-atan2: 1.0ms (3.8% of total)ival-add: 1.0ms (3.8% of total)ival-assert: 0.0ms (0% of total)ival-true: 0.0ms (0% of total)Useful iterations: 2 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 427 | 6646 |
| 1 | 802 | 6375 |
| 2 | 2444 | 5932 |
| 1× | node limit |
| Inputs |
|---|
(if (<=.f64 y.re #s(literal -607985949695017/4503599627370496 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 y.re #s(literal 4165829655317709/2251799813685248 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
(if (<=.f64 y.re #s(literal -7148113328562451/1152921504606846976 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 y.re #s(literal 5224175567749775/9007199254740992 binary64)) (*.f64 (/.f64 #s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
(if (<=.f64 x.im #s(literal -2561130402765641/39402006196394479212279040100143613805079739270465446667948293404245721771497210611414266254884915640806627990306816 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (if (<=.f64 x.im #s(literal 60000000000000005193984155998299416148885396088322703424051684688158036869067173427197602770710343908757614245698960540769310519363705240784005425495277568 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
(if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal -inf.0 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) (if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal +inf.0 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
(if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal -inf.0 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) (if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal +inf.0 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
(if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 1/2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
(if (<=.f64 x.im #s(literal 11000000000000000 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
(if (<=.f64 x.re #s(literal -54999999999999994403215762636512536548247801471639193909755560262737629411888577184700854065155142569254546353617395544465426739052850132561575364526080 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (if (<=.f64 x.re #s(literal 2708880863357441/416750902054990892129990736920078612321547395144744260024766113235252327363602004470089512554472143171433119412089577527868050103382460317522709753270676877880947348719625909903942392869488376545560313508492912623855671752342278830697742336 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
(if (<=.f64 x.re #s(literal -3200000000000000098581322339088822104864806528244587083074871810221247529322605969408 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (if (<=.f64 x.re #s(literal -7985044781431033/2348542582773833227889480596789337027375682548908319870707290971532209025114608443463698998384768703031934976 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (if (<=.f64 x.re #s(literal 2708880863357441/416750902054990892129990736920078612321547395144744260024766113235252327363602004470089512554472143171433119412089577527868050103382460317522709753270676877880947348719625909903942392869488376545560313508492912623855671752342278830697742336 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
(if (<=.f64 x.re #s(literal 2708880863357441/416750902054990892129990736920078612321547395144744260024766113235252327363602004470089512554472143171433119412089577527868050103382460317522709753270676877880947348719625909903942392869488376545560313508492912623855671752342278830697742336 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
(if (<=.f64 x.im #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
| Outputs |
|---|
(if (<=.f64 y.re #s(literal -607985949695017/4503599627370496 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 y.re #s(literal 4165829655317709/2251799813685248 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
(if (or (<=.f64 y.re #s(literal -607985949695017/4503599627370496 binary64)) (not (<=.f64 y.re #s(literal 4165829655317709/2251799813685248 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(if (<=.f64 y.re #s(literal -7148113328562451/1152921504606846976 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 y.re #s(literal 5224175567749775/9007199254740992 binary64)) (*.f64 (/.f64 #s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
(if (or (<=.f64 y.re #s(literal -7148113328562451/1152921504606846976 binary64)) (not (<=.f64 y.re #s(literal 5224175567749775/9007199254740992 binary64)))) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 #s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))) |
(if (<=.f64 x.im #s(literal -2561130402765641/39402006196394479212279040100143613805079739270465446667948293404245721771497210611414266254884915640806627990306816 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (if (<=.f64 x.im #s(literal 60000000000000005193984155998299416148885396088322703424051684688158036869067173427197602770710343908757614245698960540769310519363705240784005425495277568 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
(if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal -inf.0 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) (if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal +inf.0 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
(if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal -inf.0 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (*.f64 #s(literal -1 binary64) y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) (if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal +inf.0 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
(if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal -inf.0 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) (if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal +inf.0 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
(if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal -inf.0 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (*.f64 #s(literal -1 binary64) y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) (if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal +inf.0 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
(if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 1/2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
(if (<=.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) #s(literal 1/2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (*.f64 #s(literal -1 binary64) y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) |
(if (<=.f64 x.im #s(literal 11000000000000000 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
(if (<=.f64 x.im #s(literal 11000000000000000 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (*.f64 #s(literal -1 binary64) y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
(if (<=.f64 x.re #s(literal -54999999999999994403215762636512536548247801471639193909755560262737629411888577184700854065155142569254546353617395544465426739052850132561575364526080 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (if (<=.f64 x.re #s(literal 2708880863357441/416750902054990892129990736920078612321547395144744260024766113235252327363602004470089512554472143171433119412089577527868050103382460317522709753270676877880947348719625909903942392869488376545560313508492912623855671752342278830697742336 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (* y.re (atan2 x.im x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))))) |
(if (<=.f64 x.re #s(literal -3200000000000000098581322339088822104864806528244587083074871810221247529322605969408 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (if (<=.f64 x.re #s(literal -7985044781431033/2348542582773833227889480596789337027375682548908319870707290971532209025114608443463698998384768703031934976 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (if (<=.f64 x.re #s(literal 2708880863357441/416750902054990892129990736920078612321547395144744260024766113235252327363602004470089512554472143171433119412089577527868050103382460317522709753270676877880947348719625909903942392869488376545560313508492912623855671752342278830697742336 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))))) |
(if (<=.f64 x.re #s(literal 2708880863357441/416750902054990892129990736920078612321547395144744260024766113235252327363602004470089512554472143171433119412089577527868050103382460317522709753270676877880947348719625909903942392869488376545560313508492912623855671752342278830697742336 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
(if (<=.f64 x.im #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
(if (<=.f64 x.im #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (*.f64 #s(literal -1 binary64) (pow.f64 y.re #s(literal 3 binary64))) (-.f64 (-.f64 (*.f64 (neg.f64 #s(literal -1/6 binary64)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 (*.f64 #s(literal -1 binary64) y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) y.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (*.f64 #s(literal -1 binary64) (pow.f64 y.re #s(literal 3 binary64))) (-.f64 (-.f64 (*.f64 (neg.f64 #s(literal -1/6 binary64)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (+.f64 (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (*.f64 #s(literal -1 binary64) y.re) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 y.re #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))))) |
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (+ (* y.re (+ (* -1/2 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (* (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))) (* 1/2 (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (atan2 x.im x.re))))))))) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (atan2 x.im x.re)))))))) (+ (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)))))))) (* (/ 1 (exp (* y.im (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))))) #s(approx (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (/ 1 x.re)) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (pow (log (/ 1 x.re)) 3) (sin (* -1 (* y.im (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (log (/ 1 x.re)) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (pow (log (/ 1 x.re)) 2) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* -1 (* y.im (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (*.f64 #s(literal -1 binary64) (pow.f64 y.re #s(literal 3 binary64))) (-.f64 (-.f64 (*.f64 (neg.f64 #s(literal -1/6 binary64)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (/.f64 (+.f64 (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (*.f64 #s(literal -1 binary64) y.re) #s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 #s(literal -1 binary64) y.im) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)) (*.f64 y.re (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))))) y.re)))))) |
| 1× | fuel |
Compiled 7 111 to 433 computations (93.9% saved)
Compiled 14 296 to 904 computations (93.7% saved)
Loading profile data...